Destination given bearing on a great circle

Time bar (total: 17.7s)

start0.0ms (0%)

Memory
0.1MiB live, 0.1MiB allocated

analyze1.3s (7.2%)

Memory
-2.6MiB live, 1 102.6MiB allocated
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.9s (16.5%)

Memory
72.9MiB live, 2 497.6MiB allocated
Samples
2.4s8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 2.1s
ival-sin: 752.0ms (36.3% of total)
ival-cos: 570.0ms (27.5% of total)
ival-mult: 409.0ms (19.7% of total)
ival-asin: 153.0ms (7.4% of total)
ival-atan2: 78.0ms (3.8% of total)
ival-add: 69.0ms (3.3% of total)
ival-sub: 33.0ms (1.6% of total)
ival-true: 6.0ms (0.3% of total)
ival-assert: 3.0ms (0.1% of total)
Bogosity

explain356.0ms (2%)

Memory
-13.2MiB live, 379.1MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
81(-3.905943022455834e-296 -2.7941647783506165e+177 1.0442307206983635e-137 3.6500217036149334e+48 -3.744164177640604e-187)2(1.1041181104093901e+247 7.418891223024381e+158 1.420071813982493e+217 -1.962553242093814e+42 -1.258536156540575e+54)(-.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)))))))cancellation41
Confusion
Predicted +Predicted -
+31
-1251
Precision
0.75
Recall
0.75
Confusion?
Predicted +Predicted MaybePredicted -
+310
-11250
Precision?
0.6666666666666666
Recall?
1.0
Freqs
test
numberfreq
0252
14
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
151.0ms512×0valid
Compiler

Compiled 436 to 73 computations (83.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 119.0ms
ival-cos: 41.0ms (34.4% of total)
ival-sin: 37.0ms (31.1% of total)
ival-mult: 17.0ms (14.3% of total)
ival-asin: 12.0ms (10.1% of total)
ival-add: 4.0ms (3.4% of total)
ival-atan2: 4.0ms (3.4% of total)
ival-sub: 2.0ms (1.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

preprocess248.0ms (1.4%)

Memory
-3.4MiB live, 72.2MiB allocated
Algorithm
egg-herbie
Rules
809×distribute-rgt-in
801×distribute-lft-in
647×distribute-lft-neg-in
525×sub-neg
397×neg-mul-1
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0179677
1399672
2699670
31226668
42722668
54034668
64664668
75393668
85778668
95943668
106050668
116182668
126432668
136965668
147098668
157124668
167124668
177124668
02233
04033
15733
28233
39733
411333
514133
618933
723833
832133
936033
1039433
1144633
1253733
1367133
1482233
15111733
16118933
17120833
18121033
19121333
20121533
0121532
Stop Event
iter limit
saturated
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 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (cos.f64 delta))) lambda1)
Symmetry

(abs phi2)

Compiler

Compiled 38 to 23 computations (39.5% saved)

eval0.0ms (0%)

Memory
0.4MiB live, 0.4MiB allocated
Compiler

Compiled 5 to 5 computations (0% saved)

prune3.0ms (0%)

Memory
2.9MiB live, 2.9MiB allocated
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.7%
(+.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 38 to 23 computations (39.5% saved)

simplify44.0ms (0.3%)

Memory
29.8MiB live, 29.9MiB allocated
Algorithm
egg-herbie
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-diff128
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
Rules
320×lower-fma.f64
320×lower-fma.f32
248×lower-*.f32
242×lower-*.f64
122×associate-*r*
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
022197
040197
157197
282197
397197
4113197
5141197
6189197
7238197
8321197
9360197
10394197
11446197
12537197
13671197
14822197
151117197
161189197
171208197
181210197
191213197
201215197
01215190
Stop Event
iter limit
saturated
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 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (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 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (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 theta) (sin.f64 delta)))
(*.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)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (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 (*.f64 (cos.f64 theta) (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 (*.f64 (cos.f64 theta) (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 (*.f64 (cos.f64 theta) (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 (*.f64 (cos.f64 theta) (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)

localize124.0ms (0.7%)

Memory
-31.7MiB live, 87.6MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy0.203125
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy0.29296875
(*.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.3289300727109211
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
accuracy0.47700802383447116
(-.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
98.0ms256×0valid
Compiler

Compiled 199 to 25 computations (87.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 68.0ms
ival-sin: 36.0ms (52.6% of total)
ival-cos: 14.0ms (20.5% of total)
ival-mult: 9.0ms (13.2% of total)
ival-asin: 4.0ms (5.8% of total)
ival-add: 2.0ms (2.9% of total)
ival-atan2: 2.0ms (2.9% of total)
ival-sub: 1.0ms (1.5% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series36.0ms (0.2%)

Memory
36.4MiB live, 36.4MiB allocated
Counts
8 → 288
Calls
Call 1
Inputs
#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())
#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())
#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())
#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())
#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())
#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())
Outputs
#s(alt (* (cos theta) (sin delta)) (taylor 0 phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta))))))) (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (sin phi1) (taylor 0 delta) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (taylor 0 delta) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))))) (taylor 0 delta) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta))))) (taylor 0 delta) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)))))))) (taylor 0 theta) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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))))))))) (taylor 0 theta) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 lambda1) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (* -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))) (taylor -inf lambda1) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (* -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))) (taylor -inf lambda1) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (* -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))) (taylor -inf lambda1) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.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))))))))) (patch (+.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))))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (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)))))))) (patch (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)))))))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta)))))))) (taylor 0 theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* 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))))))))) (taylor 0 theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))) (taylor 0 delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta)))))))) (taylor 0 delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* 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))))))))) (taylor 0 delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 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)) (taylor 0 delta) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (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))))) (taylor 0 theta) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (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))))) (taylor 0 theta) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 delta) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 delta) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 delta) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 delta) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 theta) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 theta) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 theta) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 theta) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))) (taylor 0 phi1) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta)))) (taylor 0 phi1) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* 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)))) (taylor 0 phi1) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor 0 delta) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)) (taylor 0 delta) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)))))))) (taylor 0 theta) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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))))))))) (taylor 0 theta) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (*.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)))))) (patch (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta))))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta)))))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta))))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta)))))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
Calls

72 calls:

TimeVariablePointExpression
3.0ms
phi1
@-inf
(- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))
2.0ms
phi1
@inf
(+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))
2.0ms
delta
@inf
(+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))
2.0ms
theta
@-inf
(+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))
2.0ms
theta
@inf
(+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))

simplify246.0ms (1.4%)

Memory
13.2MiB live, 198.8MiB allocated
Algorithm
egg-herbie
Rules
9 047×lower-fma.f64
9 047×lower-fma.f32
3 000×lower-*.f64
3 000×lower-*.f32
2 212×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02815807
19765684
234235625
359955582
081625302
Stop Event
iter limit
node limit
Counts
288 → 286
Calls
Call 1
Inputs
(* (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)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (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)))))))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(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 (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)))
(* 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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 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)))
(* -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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(+ lambda1 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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 phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin 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)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (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 phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (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))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (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)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (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 phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(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 phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (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))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
Outputs
(* (cos theta) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))
(fma.f64 (cos.f64 delta) phi1 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))
(fma.f64 (fma.f64 phi1 (*.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))
(+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta))))))) (* (cos theta) (sin delta)))
(+.f64 (fma.f64 (fma.f64 phi1 (*.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1)) (*.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 delta) phi1)) phi1) phi1))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(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 delta (*.f64 #s(literal -1/2 binary64) delta) #s(literal 1 binary64)) (sin.f64 phi1) (*.f64 (*.f64 delta (cos.f64 theta)) (cos.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 delta (*.f64 #s(literal -1/6 binary64) delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64))) delta (sin.f64 phi1))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))
(fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(fma.f64 (fma.f64 (*.f64 theta theta) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 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))))))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 (*.f64 theta theta) #s(literal -1/2 binary64) (fma.f64 (*.f64 theta theta) (*.f64 #s(literal 1/24 binary64) (*.f64 theta theta)) #s(literal 1 binary64))) (*.f64 (sin.f64 phi1) (cos.f64 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)))))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 (*.f64 theta theta) (fma.f64 #s(literal -1/720 binary64) (*.f64 theta theta) #s(literal 1/24 binary64)) #s(literal -1/2 binary64))) (*.f64 theta theta) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
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)))
(-.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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))))))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(-.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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))))))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(-.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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))))))
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 lambda1 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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))))))
(* -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 lambda1 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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))))))
(* -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 lambda1 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 (*.f64 #s(literal -1/6 binary64) theta) theta (fma.f64 (*.f64 theta theta) (*.f64 #s(literal 1/120 binary64) (*.f64 theta theta)) #s(literal 1 binary64)))) 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 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 (*.f64 theta theta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (*.f64 theta theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) theta)
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* 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 (fma.f64 (*.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 phi1) delta) (sin.f64 theta)))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(*.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 (*.f64 #s(literal -1/6 binary64) delta) delta (fma.f64 (*.f64 delta delta) (*.f64 (*.f64 delta delta) #s(literal 1/120 binary64)) #s(literal 1 binary64)))) 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 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (*.f64 delta delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) delta)
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 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 (*.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)))))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)) #s(literal 1 binary64))))
(+ (* (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 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) delta (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 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)) delta) delta (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) delta (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 (*.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (*.f64 #s(literal 1/6 binary64) delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1))) #s(literal -1/2 binary64)) delta) delta (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) 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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (*.f64 phi1 (sin.f64 delta)) (neg.f64 (cos.f64 theta)) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (fma.f64 (cos.f64 delta) phi1 (*.f64 (sin.f64 delta) (cos.f64 theta))) (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 (neg.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) phi1) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)) (cos.f64 delta)) phi1 (*.f64 (sin.f64 delta) (cos.f64 theta)))) phi1 (cos.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.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 (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (fma.f64 (*.f64 theta theta) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 delta)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 delta)) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64))) (*.f64 theta theta)) (*.f64 theta theta) (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (fma.f64 (*.f64 theta theta) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.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 delta) phi1 (*.f64 (sin.f64 delta) (cos.f64 theta))) 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) phi1) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)) (cos.f64 delta)) phi1 (*.f64 (sin.f64 delta) (cos.f64 theta))) 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 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)))) phi1 (cos.f64 delta)) phi1 (*.f64 (sin.f64 delta) (cos.f64 theta))) phi1)
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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))
(*.f64 (sin.f64 phi1) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))
(+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(fma.f64 (fma.f64 delta (*.f64 #s(literal -1/2 binary64) delta) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))
(+ (* 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 (fma.f64 delta (*.f64 #s(literal -1/6 binary64) delta) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (*.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)))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(*.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(*.f64 (sin.f64 phi1) (fma.f64 (fma.f64 (*.f64 theta theta) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 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))))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 delta)) (+.f64 (fma.f64 (*.f64 theta theta) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 theta theta) (*.f64 #s(literal 1/24 binary64) (*.f64 theta theta)))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+ (* (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 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 delta)) (fma.f64 (*.f64 theta theta) (fma.f64 #s(literal -1/720 binary64) (*.f64 theta theta) #s(literal 1/24 binary64)) #s(literal -1/2 binary64))) (*.f64 theta theta) (*.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* theta (sin delta))
(*.f64 (sin.f64 delta) theta)
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (*.f64 (sin.f64 delta) theta))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(*.f64 (*.f64 (sin.f64 delta) (fma.f64 (*.f64 #s(literal -1/6 binary64) theta) theta (fma.f64 (*.f64 theta theta) (*.f64 #s(literal 1/120 binary64) (*.f64 theta theta)) #s(literal 1 binary64)))) 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 (*.f64 (sin.f64 delta) (fma.f64 (*.f64 theta theta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (*.f64 theta theta) (sin.f64 delta)) theta)
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* delta (sin theta))
(*.f64 (sin.f64 theta) delta)
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) 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 (*.f64 (sin.f64 theta) (fma.f64 (*.f64 #s(literal -1/6 binary64) delta) delta (fma.f64 (*.f64 delta delta) (*.f64 (*.f64 delta delta) #s(literal 1/120 binary64)) #s(literal 1 binary64)))) 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 (*.f64 (*.f64 (sin.f64 theta) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) delta) delta (sin.f64 theta)) delta)
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))

rewrite257.0ms (1.5%)

Memory
4.0MiB live, 240.2MiB allocated
Rules
3 493×lower-fma.f64
3 493×lower-fma.f32
2 971×lower-*.f32
2 965×lower-*.f64
1 950×lower-/.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
022147
040139
1120139
2846139
08744133
Stop Event
iter limit
node limit
iter limit
Counts
8 → 340
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 (sin.f64 theta) (sin.f64 delta))
Outputs
(*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (-.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 delta delta)))))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))))
(*.f64 (neg.f64 (fma.f64 (-.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 delta delta)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 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)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (-.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 delta delta)))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))))))
(*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(*.f64 (fma.f64 (-.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 delta delta)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 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 #s(literal 1 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)) (-.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 #s(literal 1 binary64) (fma.f64 (-.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 delta delta)))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (-.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 delta delta))))) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (/.f64 (*.f64 (-.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 delta delta))))) (-.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 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 (*.f64 (-.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 delta delta))))) (-.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 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))))))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (-.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 delta delta))))) (-.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 (*.f64 (-.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 delta delta))))) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (/.f64 (*.f64 (-.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 delta delta))))) (-.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 (*.f64 (-.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 delta delta))))) (-.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 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (fma.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (-.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 delta delta))))))) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (-.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 delta delta)))) (neg.f64 (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 #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 delta delta)))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (-.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 delta delta)))) (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 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 4 binary64))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (cos.f64 delta)) #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 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (-.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 delta delta)))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 9 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 9 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 6 binary64))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (-.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 delta delta)))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (-.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 delta delta))))) (-.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 (+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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)) (*.f64 (-.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 delta delta)))))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(/.f64 (neg.f64 (fma.f64 (-.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 delta delta)))) (neg.f64 (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 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (-.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 (fma.f64 (-.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 delta delta)))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))) (-.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (-.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 delta delta))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.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 (*.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 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(/.f64 (fma.f64 (-.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 delta delta)))) (neg.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 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 (*.f64 (cos.f64 delta) (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 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 #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 delta delta)))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))))
(neg.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (-.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 delta delta)))))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))) (neg.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))))))
(fma.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (-.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 delta delta)))))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))) (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))))))
(fma.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))
(fma.f64 (neg.f64 (fma.f64 (-.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 delta delta)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))) (neg.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))))))
(fma.f64 (neg.f64 (fma.f64 (-.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 delta delta)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))) (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))))))
(fma.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)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (-.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 delta delta)))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))))) (neg.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))))))
(fma.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)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (-.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 delta delta)))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))))) (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))))))
(fma.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))))
(fma.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))))))
(fma.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))))))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))
(fma.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (fma.f64 (-.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 delta delta)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (neg.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))))))
(fma.f64 (fma.f64 (-.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 delta delta)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))))))
(fma.f64 (*.f64 (-.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 delta delta))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (neg.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)))))))
(fma.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 #s(literal 1 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)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) (neg.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))))))
(fma.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 #s(literal 1 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)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))))))
(fma.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 #s(literal 1 binary64) (fma.f64 (-.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 delta delta)))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))))) (neg.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))))))
(fma.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 #s(literal 1 binary64) (fma.f64 (-.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 delta delta)))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))))) (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))))))
(fma.f64 (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.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 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))
(sin.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))) (/.f64 (*.f64 (-.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 delta delta))))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))))
(-.f64 (*.f64 (sin.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64))))) #s(literal 1 binary64)))
(-.f64 (/.f64 (*.f64 (-.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 delta delta))))) (-.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 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))))))
(cos.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))))
(+.f64 (/.f64 (*.f64 (-.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 delta delta))))) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (neg.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 (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))))))
(+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (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)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))))
(*.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)))))
(*.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) 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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))))
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #s(literal -1 binary64))
(/.f64 (-.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (fma.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) 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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 lambda1 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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 4 binary64)) (pow.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) #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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) 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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1) (*.f64 lambda1 lambda1)) (*.f64 (*.f64 lambda1 lambda1) lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 9 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (fma.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (*.f64 lambda1 lambda1)) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 6 binary64))) (pow.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) 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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 #s(literal 1 binary64) (/.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) 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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)))
(neg.f64 (/.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
(neg.f64 (/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))))
(neg.f64 (/.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))))
(neg.f64 (/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)))))
(fma.f64 (*.f64 lambda1 lambda1) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))
(*.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1)) #s(literal 1/2 binary64))
(*.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal 1/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 (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 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))))))
(/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta))))
(*.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(*.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))
(*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)) (-.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)) (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)) (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)) (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) #s(literal 3 binary64))) (fma.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) (fma.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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)) (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)) (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)) (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)) (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (*.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)) (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)) (cos.f64 delta)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 4 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 6 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 4 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 4 binary64))) (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 delta)) #s(literal 2 binary64))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 6 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 9 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 9 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 6 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 6 binary64))) (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) (*.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)))) (*.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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)) (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (*.f64 (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)))) (*.f64 (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)) (-.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)) (-.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)) (cos.f64 delta))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)) (-.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))
(neg.f64 (/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
(neg.f64 (/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)))) (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))
(neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64))) (neg.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)))))
(neg.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))) (neg.f64 (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))
(fma.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal -1 binary64)) (sin.f64 phi1) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 phi1) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))
(fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal -1 binary64)) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal -1 binary64)) (sin.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal -1 binary64)) (sin.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (-.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 delta delta)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (cos.f64 delta))
(fma.f64 (*.f64 (neg.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)))) (/.f64 #s(literal 1 binary64) (fma.f64 (-.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 delta delta)))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))))) (cos.f64 delta))
(fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (sin.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (sin.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))
(fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)))) #s(literal 1/2 binary64) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))
(fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)))))
(fma.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (neg.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)) (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1))) #s(literal -1/2 binary64) (cos.f64 delta))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (neg.f64 (sin.f64 phi1)) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(-.f64 (+.f64 (cos.f64 delta) #s(literal 0 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)) (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))
(-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 delta)))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) #s(literal 1/2 binary64)))
(+.f64 (+.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (neg.f64 (sin.f64 phi1)))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))))
(+.f64 (+.f64 (cos.f64 delta) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (neg.f64 (sin.f64 phi1))))
(+.f64 (+.f64 (cos.f64 delta) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))
(+.f64 (+.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))))
(+.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (neg.f64 (sin.f64 phi1))) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))
(+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))
(+.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))
(+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (neg.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)) (+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(+.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)) (cos.f64 delta))
(+.f64 (cos.f64 delta) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)))
(*.f64 (-.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (pow.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
(*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (+.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(/.f64 (-.f64 (*.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64)))) (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64))) (+.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (*.f64 (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
(/.f64 (-.f64 (pow.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64)))) #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64))) (fma.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64)))) (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64)))) (fma.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (*.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64) (pow.f64 (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (-.f64 (*.f64 (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (pow.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (+.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (pow.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (+.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) (-.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (pow.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (+.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64)))))
(fma.f64 (neg.f64 (PI.f64)) #s(literal -1/2 binary64) (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(fma.f64 #s(literal 1 binary64) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(-.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (/.f64 (pow.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (+.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) (/.f64 (pow.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64)) (fma.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (+.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(-.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64)))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(+.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64)))) (*.f64 (neg.f64 (PI.f64)) #s(literal 1/2 binary64)))
(+.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64)))) (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(*.f64 (*.f64 (fma.f64 (-.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 delta delta)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)))) (sin.f64 phi1)) (/.f64 #s(literal 1 binary64) (-.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)) (/.f64 #s(literal 1 binary64) (fma.f64 (-.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 delta delta)))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))))))
(*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (-.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 delta delta)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 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)))) (/.f64 #s(literal 1 binary64) (fma.f64 (-.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 delta delta)))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))))))
(*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)))) #s(literal -1/2 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))
(*.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1))) #s(literal 1/2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1))) #s(literal 1/2 binary64))
(*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))) (-.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
(/.f64 (-.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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))) (-.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (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 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) #s(literal 1/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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (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 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (-.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (-.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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (-.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 delta delta)))) (neg.f64 (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 #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 delta delta)))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)))) #s(literal 4 binary64))
(/.f64 (*.f64 (fma.f64 (-.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 delta delta)))) (neg.f64 (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 #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 delta delta)))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))))
(/.f64 (*.f64 (sin.f64 phi1) (fma.f64 (-.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 delta delta)))) (neg.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 (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 #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 delta delta)))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))))
(/.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (-.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 delta delta)))) (neg.f64 (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 (*.f64 (neg.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 #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 delta delta)))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)))) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (*.f64 (fma.f64 (-.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 delta delta)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)))) (sin.f64 phi1))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (-.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 delta delta)))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))) (sin.f64 phi1))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (*.f64 (sin.f64 phi1) (fma.f64 (-.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 delta delta)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (-.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 delta delta)))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))) (*.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))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))
(/.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1))) #s(literal 2 binary64))
(/.f64 (sin.f64 phi1) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(neg.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)))
(fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 phi1) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 phi1) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(fma.f64 (*.f64 (sin.f64 phi1) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(fma.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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)))
(fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (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 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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) #s(literal 1/2 binary64)))
(-.f64 (*.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(+.f64 (*.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) #s(literal 1/2 binary64))))
(*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal -1/2 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) #s(literal 1/2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 theta delta)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (-.f64 theta delta)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 (+.f64 theta delta)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 theta delta)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (-.f64 theta delta)) #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 theta delta)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 theta delta)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 theta delta)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 theta delta)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (-.f64 theta delta)) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (cos.f64 (+.f64 theta delta)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 theta delta)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 theta delta)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 theta delta)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta)))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 theta delta)))) #s(literal 4 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta)))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta))))
(/.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))
(neg.f64 (/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal -2 binary64)))
(fma.f64 (cos.f64 (-.f64 theta delta)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (+.f64 theta delta)) #s(literal 1/2 binary64))))
(-.f64 (/.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 theta delta)) #s(literal 1/2 binary64)))
(-.f64 (*.f64 (cos.f64 (-.f64 theta delta)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 theta delta)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (-.f64 theta delta)) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (cos.f64 (+.f64 theta delta)) #s(literal 1/2 binary64))))

eval161.0ms (0.9%)

Memory
-26.2MiB live, 147.4MiB allocated
Compiler

Compiled 31 813 to 2 294 computations (92.8% saved)

prune137.0ms (0.8%)

Memory
0.8MiB live, 159.0MiB allocated
Pruning

29 alts after pruning (29 fresh and 0 done)

PrunedKeptTotal
New59729626
Fresh000
Picked101
Done000
Total59829627
Accuracy
99.9%
Counts
627 → 29
Alt Table
Click to see full alt table
StatusAccuracyProgram
70.3%
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1))
48.2%
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (fma.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
99.4%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
91.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.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)))) (/.f64 #s(literal 1 binary64) (fma.f64 (-.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 delta delta)))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))))) (cos.f64 delta))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (sin.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) (*.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)))) (*.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))))
88.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 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
91.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)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
76.4%
(+.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 (cos.f64 delta) phi1 (*.f64 (sin.f64 delta) (cos.f64 theta))) phi1)))))
85.0%
(+.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))))))
80.4%
(+.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 (sin.f64 phi1) (fma.f64 (fma.f64 (*.f64 theta theta) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
83.7%
(+.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 (sin.f64 phi1) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
93.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))))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))))
77.6%
(+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
77.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))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) delta (cos.f64 phi1))))))
87.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))))))) (cos.f64 delta))))
74.1%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 (*.f64 #s(literal -1/6 binary64) delta) delta (fma.f64 (*.f64 delta delta) (*.f64 (*.f64 delta delta) #s(literal 1/120 binary64)) #s(literal 1 binary64)))) 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)))))))))
74.0%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 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)))))))))
54.8%
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))))
70.2%
(*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)))
35.2%
#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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
Compiler

Compiled 2 870 to 1 382 computations (51.8% saved)

simplify158.0ms (0.9%)

Memory
24.4MiB live, 133.9MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))
cost-diff0
(pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64))
cost-diff0
(-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
cost-diff80320
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))))
cost-diff128
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))
cost-diff128
(neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
cost-diff6592
(+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (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)) (-.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 (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 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
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)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))))
cost-diff6848
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))
Rules
4 066×lower-fma.f32
4 062×lower-fma.f64
1 485×lower-*.f32
1 469×lower-*.f64
1 207×lower--.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
069987
0121954
1216926
2402921
3997913
41964913
53567913
64712913
76844913
08078906
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)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (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 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))
(*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1))
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
(cos.f64 delta)
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
(*.f64 (cos.f64 theta) (cos.f64 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))))))) (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)) (-.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 (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 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (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 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(cos.f64 delta)
(*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(sin.f64 phi1)
(sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(cos.f64 theta)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (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 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(cos.f64 theta)
(+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))
(neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))
(cos.f64 (*.f64 #s(literal 2 binary64) phi1))
(*.f64 #s(literal 2 binary64) phi1)
#s(literal 2 binary64)
(cos.f64 delta)
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.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) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))
(cos.f64 delta)
(*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(*.f64 (cos.f64 phi1) (cos.f64 theta))
(cos.f64 theta)
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(sin.f64 phi1)
#s(literal 2 binary64)
(*.f64 lambda1 lambda1)
lambda1
(-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.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 (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 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1))
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
(cos.f64 delta)
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta))
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
(*.f64 (*.f64 (neg.f64 (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))
(*.f64 (cos.f64 theta) (cos.f64 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))))))) (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)) (-.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 (sin.f64 delta) (cos.f64 theta)))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (cos.f64 theta) (sin.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 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (cos.f64 theta) (sin.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 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(fma.f64 (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (cos.f64 theta) (sin.f64 delta))))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(cos.f64 delta)
(*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(*.f64 (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (cos.f64 theta) (sin.f64 delta))))) (sin.f64 phi1))
(sin.f64 phi1)
(sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
(asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(cos.f64 theta)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))))
(+.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 (neg.f64 (sin.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1))))) lambda1)
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))
(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 (neg.f64 (sin.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (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
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))
(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 (neg.f64 (sin.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1))))
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(cos.f64 theta)
(+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))
(neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))
(*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))
(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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))
(*.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)
(cos.f64 delta)
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))
(pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64))
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.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 (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 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(cos.f64 delta)
(*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))
(*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(*.f64 (cos.f64 phi1) (cos.f64 theta))
(*.f64 (cos.f64 theta) (cos.f64 phi1))
(cos.f64 theta)
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(sin.f64 phi1)
#s(literal 2 binary64)
(*.f64 lambda1 lambda1)
lambda1
(-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)
(-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)

localize488.0ms (2.8%)

Memory
-16.8MiB live, 466.2MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.24837875976844204
(pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64))
accuracy0.29296875
(*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))
accuracy0.47700802383447116
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))
accuracy18.879018149550433
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1))
accuracy0.203125
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy0.213222509768442
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
accuracy0.5111282462028861
(+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))
accuracy15.383520525507778
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))
accuracy0.29296875
(*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
accuracy0.3289300727109211
(asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))))
accuracy0.47700802383447116
(-.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 (sin.f64 delta) (cos.f64 theta)))))))
accuracy37.48842619109519
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))
accuracy0.1171875
(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.16015625
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
accuracy0.203125
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy26.507005228428095
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
accuracy0.203125
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy0.2265625
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
accuracy0.26400375976844204
(*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1))
accuracy0.4793217968389034
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))
Samples
201.0ms88×2valid
80.0ms130×0valid
77.0ms38×1valid
Compiler

Compiled 957 to 63 computations (93.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 270.0ms
ival-mult: 65.0ms (24.1% of total)
ival-cos: 49.0ms (18.2% of total)
ival-atan2: 40.0ms (14.8% of total)
adjust: 34.0ms (12.6% of total)
ival-add: 31.0ms (11.5% of total)
ival-sin: 28.0ms (10.4% of total)
ival-sub: 8.0ms (3% of total)
ival-asin: 6.0ms (2.2% of total)
ival-neg: 3.0ms (1.1% of total)
ival-pow2: 3.0ms (1.1% of total)
ival-div: 2.0ms (0.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series128.0ms (0.7%)

Memory
15.3MiB live, 92.7MiB allocated
Counts
27 → 936
Calls
Call 1
Inputs
#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())
#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())
#s(alt (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))) (patch (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))) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())
#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())
#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())
#s(alt (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())
#s(alt (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())
#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())
#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())
#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())
#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) #<representation binary64>) () ())
#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())
#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())
#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())
#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())
#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())
#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())
#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())
Outputs
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta)))))) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))))))))) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (pow (sin phi1) 2))) (taylor 0 delta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* -1 (pow (sin phi1) 2)))) (taylor 0 delta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/2 (pow (sin phi1) 2)) 1/2)))))) (taylor 0 delta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ 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)))))) (taylor 0 delta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor 0 theta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))))) (taylor 0 theta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (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)))))))))))) (taylor 0 theta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta)))))))) (taylor 0 theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* 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))))))))) (taylor 0 theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))) (taylor 0 delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta)))))))) (taylor 0 delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* 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))))))))) (taylor 0 delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* -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))) (taylor -inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* -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))) (taylor -inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* -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))) (taylor -inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta))))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta)))))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta))))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta)))))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 lambda1) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (* -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))) (taylor -inf lambda1) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (* -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))) (taylor -inf lambda1) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (* -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))) (taylor -inf lambda1) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.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 (sin.f64 delta) (cos.f64 theta))))))))) (patch (+.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 (sin.f64 delta) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (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 (sin.f64 delta) (cos.f64 theta)))))))) (patch (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 (sin.f64 delta) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (pow phi1 2) (cos delta)))) (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta)))) (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta)))) (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor 0 delta) (#s(alt (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1 (* (pow delta 2) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* 1/2 (cos (* 2 phi1))))) (taylor 0 delta) (#s(alt (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))))) (taylor 0 delta) (#s(alt (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))))) (taylor 0 delta) (#s(alt (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow phi1 2) (cos delta))) (taylor 0 phi1) (#s(alt (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta))) (taylor 0 phi1) (#s(alt (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta))) (taylor 0 phi1) (#s(alt (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (- (* (pow phi1 2) (- (* (pow phi1 2) (- (* 1/315 (* (pow phi1 2) (cos delta))) (* 2/45 (cos delta)))) (* -1/3 (cos delta)))) (cos delta))) (taylor 0 phi1) (#s(alt (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (cos (* 2 phi1))) 1/2) (taylor 0 delta) (#s(alt (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 phi1))) (* 1/2 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) 1/2) (taylor 0 delta) (#s(alt (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* -1/24 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) 1/2) (taylor 0 delta) (#s(alt (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (* 1/720 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) 1/2) (taylor 0 delta) (#s(alt (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (pow phi1 2) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2)))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3)))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3)))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor 0 theta) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor 0 theta) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor 0 theta) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor 0 theta) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor inf theta) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor inf theta) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor inf theta) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor inf theta) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor -inf theta) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor -inf theta) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor -inf theta) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor -inf theta) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor 0 delta) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor 0 delta) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor 0 delta) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor 0 delta) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor inf delta) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor inf delta) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor inf delta) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor inf delta) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor -inf delta) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor -inf delta) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor -inf delta) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor -inf delta) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor 0 phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor 0 phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor 0 phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor 0 phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor inf phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor inf phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor inf phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor inf phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor -inf phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor -inf phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor -inf phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) (taylor -inf phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -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))) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -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))) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -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))) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (patch (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor 0 theta) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor 0 theta) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor 0 theta) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor 0 theta) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor inf theta) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor inf theta) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor inf theta) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor inf theta) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor -inf theta) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor -inf theta) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor -inf theta) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor -inf theta) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor 0 delta) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor 0 delta) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor 0 delta) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor 0 delta) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor inf delta) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor inf delta) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor inf delta) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor inf delta) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor -inf delta) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor -inf delta) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor -inf delta) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor -inf delta) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor 0 phi1) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor 0 phi1) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor 0 phi1) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor 0 phi1) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor inf phi1) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor inf phi1) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor inf phi1) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor inf phi1) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor -inf phi1) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor -inf phi1) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor -inf phi1) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (taylor -inf phi1) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor 0 lambda1) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow lambda1 2)) (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)) (taylor 0 lambda1) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow lambda1 2)) (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)) (taylor 0 lambda1) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow lambda1 2)) (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)) (taylor 0 lambda1) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow lambda1 2)) (taylor inf lambda1) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) 1)) (taylor inf lambda1) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) 1)) (taylor inf lambda1) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) 1)) (taylor inf lambda1) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow lambda1 2)) (taylor -inf lambda1) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) 1)) (taylor -inf lambda1) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) 1)) (taylor -inf lambda1) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) 1)) (taylor -inf lambda1) (#s(alt (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (patch (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor 0 theta) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor 0 theta) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor 0 theta) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor 0 theta) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor inf theta) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor inf theta) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor inf theta) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor inf theta) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor -inf theta) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor -inf theta) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor -inf theta) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor -inf theta) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor 0 delta) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor 0 delta) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor 0 delta) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor 0 delta) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor inf delta) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor inf delta) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor inf delta) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor inf delta) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor -inf delta) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor -inf delta) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor -inf delta) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor -inf delta) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor 0 phi1) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor 0 phi1) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor 0 phi1) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor 0 phi1) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor inf phi1) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor inf phi1) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor inf phi1) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor inf phi1) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor -inf phi1) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor -inf phi1) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor -inf phi1) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (taylor -inf phi1) (#s(alt (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (patch (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow phi1 2)) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* (pow phi1 2) (- (* 1/315 (pow phi1 2)) 2/45)))) 1)) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow (sin phi1) 2)) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow (sin phi1) 2)) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow (sin phi1) 2)) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow (sin phi1) 2)) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow (sin phi1) 2)) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow (sin phi1) 2)) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow (sin phi1) 2)) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow (sin phi1) 2)) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (cos theta))) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (cos theta)) (* -1 (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))) (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))))))) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta))))))) (* -1 (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta))))))))))) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (sin phi1))) (taylor 0 theta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (sin phi1))) (* 1/2 (* (pow theta 2) (* (cos phi1) (sin phi1))))) (taylor 0 theta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/2 (* (cos phi1) (sin phi1)))))) (taylor 0 theta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (sin phi1))) (* 1/720 (* (pow theta 2) (* (cos phi1) (sin phi1))))))))) (taylor 0 theta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf theta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf theta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf theta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf theta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf theta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf theta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf theta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf theta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ 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)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ (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))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ (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))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (sin delta)) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta))))))) (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (sin phi1) (taylor 0 delta) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (taylor 0 delta) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))))) (taylor 0 delta) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta))))) (taylor 0 delta) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)))))))) (taylor 0 theta) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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))))))))) (taylor 0 theta) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 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)) (taylor 0 delta) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (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))))) (taylor 0 theta) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (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))))) (taylor 0 theta) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt (-.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 (sin.f64 delta) (cos.f64 theta))))))) (patch (-.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 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 delta) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 delta) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 delta) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 delta) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 theta) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 theta) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 theta) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 theta) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta)))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* 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)))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)))))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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))))))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (sin delta))) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (sin delta)) (* -1 (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* -1/6 (sin delta))))))) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (sin delta)) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (sin delta)) (+ (* 1/24 (sin delta)) (* 1/12 (sin delta)))))) (* -1 (+ (* -1/2 (sin delta)) (* -1/6 (sin delta)))))))) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (sin delta)) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (sin delta)) (* -1/6 (sin delta)))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* -1/144 (sin delta)) (+ (* -1/240 (sin delta)) (+ (* -1/720 (sin delta)) (* -1/5040 (sin delta))))))) (* -1 (+ (* 1/120 (sin delta)) (+ (* 1/24 (sin delta)) (* 1/12 (sin delta))))))))))) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* delta (* (cos phi1) (sin phi1)))) (taylor 0 delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* 1/6 (* (pow delta 2) (* (cos phi1) (sin phi1)))))) (taylor 0 delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow delta 2) (+ (* -1/120 (* (pow delta 2) (* (cos phi1) (sin phi1)))) (* 1/6 (* (cos phi1) (sin phi1))))))) (taylor 0 delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow delta 2) (+ (* 1/6 (* (cos phi1) (sin phi1))) (* (pow delta 2) (+ (* -1/120 (* (cos phi1) (sin phi1))) (* 1/5040 (* (pow delta 2) (* (cos phi1) (sin phi1)))))))))) (taylor 0 delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor inf delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor inf delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor inf delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor inf delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor -inf delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor -inf delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor -inf delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor -inf delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ 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)) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (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))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (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))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))) (taylor 0 phi1) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta)))) (taylor 0 phi1) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* 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)))) (taylor 0 phi1) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)))))))) (taylor 0 theta) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (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))))))))) (taylor 0 theta) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor 0 delta) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)) (taylor 0 delta) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
Calls

234 calls:

TimeVariablePointExpression
9.0ms
delta
@0
(neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta)))
6.0ms
delta
@0
(+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))
2.0ms
phi1
@inf
(+ (* (* (neg (sin phi1)) (sin phi1)) (cos delta)) (+ (* (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (sin delta)) (cos delta)))
2.0ms
phi1
@-inf
(+ (* (* (neg (sin phi1)) (sin phi1)) (cos delta)) (+ (* (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (sin delta)) (cos delta)))
2.0ms
delta
@inf
(+ (* (* (neg (sin phi1)) (sin phi1)) (cos delta)) (+ (* (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (sin delta)) (cos delta)))

simplify665.0ms (3.8%)

Memory
-195.9MiB live, 304.9MiB allocated
Algorithm
egg-herbie
Rules
7 289×lower-fma.f64
7 289×lower-fma.f32
3 872×lower-*.f64
3 872×lower-*.f32
1 794×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
059025555
1202723527
2713123464
0806622473
Stop Event
iter limit
node limit
Counts
936 → 926
Calls
Call 1
Inputs
(cos delta)
(+ (cos delta) (* -1 (* phi1 (* (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) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin 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))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (sin delta) (sin phi1))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (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 (* (cos delta) (pow (sin phi1) 2))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (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) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (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)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin 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)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (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 phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(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 (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)))
(* 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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 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)))
(* -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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(+ lambda1 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (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))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(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 (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)))
(* 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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 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)))
(* -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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(+ lambda1 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(cos delta)
(+ (cos delta) (* -1 (* (pow phi1 2) (cos delta))))
(+ (cos delta) (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta))))
(+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (+ (* -1 (* (pow delta 2) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* 1/2 (cos (* 2 phi1)))))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (pow phi1 2) (cos delta)))
(* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta)))
(* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta)))
(* (pow phi1 2) (- (* (pow phi1 2) (- (* (pow phi1 2) (- (* 1/315 (* (pow phi1 2) (cos delta))) (* 2/45 (cos delta)))) (* -1/3 (cos delta)))) (cos delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (* 1/2 (cos (* 2 phi1))) 1/2)
(- (+ (* 1/2 (cos (* 2 phi1))) (* 1/2 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) 1/2)
(- (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* -1/24 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) 1/2)
(- (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (* 1/720 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) 1/2)
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(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))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (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 (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 (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)))
(* 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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 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)))
(* -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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(+ (* -1 (pow lambda1 2)) (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2))
(+ (* -1 (pow lambda1 2)) (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2))
(+ (* -1 (pow lambda1 2)) (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2))
(* -1 (pow lambda1 2))
(* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) 1))
(* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) 1))
(* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) 1))
(* -1 (pow lambda1 2))
(* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) 1))
(* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) 1))
(* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) 1))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(* -1 (pow phi1 2))
(* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))
(* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))
(* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* (pow phi1 2) (- (* 1/315 (pow phi1 2)) 2/45)))) 1))
(* -1 (pow (sin phi1) 2))
(* -1 (pow (sin phi1) 2))
(* -1 (pow (sin phi1) 2))
(* -1 (pow (sin phi1) 2))
(* -1 (pow (sin phi1) 2))
(* -1 (pow (sin phi1) 2))
(* -1 (pow (sin phi1) 2))
(* -1 (pow (sin phi1) 2))
(* -1 (* phi1 (cos theta)))
(* phi1 (+ (* -1 (cos theta)) (* -1 (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))))))
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))) (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))))
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta))))))) (* -1 (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))))))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (sin phi1)))
(+ (* -1 (* (cos phi1) (sin phi1))) (* 1/2 (* (pow theta 2) (* (cos phi1) (sin phi1)))))
(+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/2 (* (cos phi1) (sin phi1))))))
(+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (sin phi1))) (* 1/720 (* (pow theta 2) (* (cos phi1) (sin phi1)))))))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin 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))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (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)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(* (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)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (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)))))))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (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))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (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)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (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 phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(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 phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* -1 (* phi1 (sin delta)))
(* phi1 (+ (* -1 (sin delta)) (* -1 (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* -1/6 (sin delta)))))))
(* phi1 (+ (* -1 (sin delta)) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (sin delta)) (+ (* 1/24 (sin delta)) (* 1/12 (sin delta)))))) (* -1 (+ (* -1/2 (sin delta)) (* -1/6 (sin delta))))))))
(* phi1 (+ (* -1 (sin delta)) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (sin delta)) (* -1/6 (sin delta)))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* -1/144 (sin delta)) (+ (* -1/240 (sin delta)) (+ (* -1/720 (sin delta)) (* -1/5040 (sin delta))))))) (* -1 (+ (* 1/120 (sin delta)) (+ (* 1/24 (sin delta)) (* 1/12 (sin delta)))))))))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* delta (* (cos phi1) (sin phi1))))
(* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* 1/6 (* (pow delta 2) (* (cos phi1) (sin phi1))))))
(* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow delta 2) (+ (* -1/120 (* (pow delta 2) (* (cos phi1) (sin phi1)))) (* 1/6 (* (cos phi1) (sin phi1)))))))
(* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow delta 2) (+ (* 1/6 (* (cos phi1) (sin phi1))) (* (pow delta 2) (+ (* -1/120 (* (cos phi1) (sin phi1))) (* 1/5040 (* (pow delta 2) (* (cos phi1) (sin phi1))))))))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin 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))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (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)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (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 phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(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 phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
Outputs
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (cos.f64 delta))
(+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (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 (fma.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))) phi1 (cos.f64 delta))) phi1 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta))) phi1 (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ 1 (* -1 (pow (sin phi1) 2)))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(+ 1 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* -1 (pow (sin phi1) 2))))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)) (pow.f64 (sin.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 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1) (*.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)) delta)) delta (-.f64 #s(literal 1 binary64) (pow.f64 (sin.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 (fma.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.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 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) delta (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (sin delta) (sin phi1))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 theta theta) #s(literal -1 binary64)) (fma.f64 (neg.f64 (cos.f64 delta)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.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 (* (cos delta) (pow (sin phi1) 2))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (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 (neg.f64 (cos.f64 delta)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (+.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 theta theta) #s(literal -1 binary64)) (*.f64 (*.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)))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) lambda1 lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (*.f64 #s(literal -1/6 binary64) 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 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 (*.f64 theta theta) (*.f64 theta theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))))) theta)
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* delta (* (cos phi1) (sin theta)))
(*.f64 (*.f64 delta (cos.f64 phi1)) (sin.f64 theta))
(* 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))))))))
(*.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) delta) delta #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (cos.f64 phi1)) (*.f64 (*.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))) delta)
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (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 (*.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)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) 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 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 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)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 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)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)))
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(* theta (sin delta))
(*.f64 (sin.f64 delta) theta)
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) 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 (*.f64 (sin.f64 delta) (fma.f64 #s(literal 1/120 binary64) (*.f64 theta theta) #s(literal -1/6 binary64))) 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 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (sin.f64 delta) (*.f64 (*.f64 (*.f64 theta theta) (*.f64 theta theta)) (*.f64 (sin.f64 delta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))))) theta)
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* delta (sin theta))
(*.f64 (sin.f64 theta) delta)
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) 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 (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) 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 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 theta) (*.f64 (*.f64 (*.f64 delta delta) (*.f64 delta delta)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))))) delta)
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) 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 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 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)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 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)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)))
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* (pow phi1 2) (cos delta))))
(*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta))
(+ (cos delta) (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta))))
(fma.f64 (*.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/3 binary64) (*.f64 phi1 phi1) #s(literal -1 binary64))) phi1) phi1 (cos.f64 delta))
(+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta))))
(fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal -2/45 binary64) (*.f64 phi1 phi1) #s(literal 1/3 binary64))) phi1) phi1 (neg.f64 (cos.f64 delta))) phi1) phi1 (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))
(+ 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 (* (pow delta 2) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* 1/2 (cos (* 2 phi1)))))
(fma.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (*.f64 delta 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))) (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))
(fma.f64 (fma.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/24 binary64) #s(literal 1/24 binary64)) delta) delta (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (*.f64 delta 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))) (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))
(fma.f64 (fma.f64 (*.f64 (fma.f64 (neg.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/720 binary64) #s(literal 1/720 binary64))) (*.f64 delta delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/24 binary64) #s(literal 1/24 binary64))) delta) delta (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (*.f64 delta delta) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))
(* -1 (* (pow phi1 2) (cos delta)))
(*.f64 (neg.f64 phi1) (*.f64 phi1 (cos.f64 delta)))
(* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta)))
(*.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/3 binary64) (*.f64 phi1 phi1) #s(literal -1 binary64))) (*.f64 phi1 phi1))
(* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta)))
(*.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal -2/45 binary64) (*.f64 phi1 phi1) #s(literal 1/3 binary64))) phi1) phi1 (neg.f64 (cos.f64 delta))) (*.f64 phi1 phi1))
(* (pow phi1 2) (- (* (pow phi1 2) (- (* (pow phi1 2) (- (* 1/315 (* (pow phi1 2) (cos delta))) (* 2/45 (cos delta)))) (* -1/3 (cos delta)))) (cos delta)))
(*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/315 binary64) (*.f64 phi1 phi1) #s(literal -2/45 binary64))) phi1) phi1 (*.f64 #s(literal 1/3 binary64) (cos.f64 delta))) phi1) phi1 (neg.f64 (cos.f64 delta))) (*.f64 phi1 phi1))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(- (* 1/2 (cos (* 2 phi1))) 1/2)
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (* 2 phi1))) (* 1/2 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 delta delta) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* -1/24 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) 1/2)
(fma.f64 (*.f64 (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/24 binary64) (*.f64 delta delta) #s(literal 1/2 binary64))) (*.f64 delta delta) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(- (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (* 1/720 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) 1/2)
(fma.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (*.f64 #s(literal 1/720 binary64) delta) delta #s(literal -1/24 binary64))) delta) delta (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (*.f64 delta delta) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/3 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) phi1)
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal 2/45 binary64) phi1) phi1 #s(literal -1/3 binary64)) phi1) phi1 #s(literal 1 binary64)) phi1) phi1)
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/315 binary64) phi1) phi1 #s(literal 2/45 binary64)) phi1) phi1 #s(literal -1/3 binary64)) phi1) phi1 #s(literal 1 binary64)) phi1) 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/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/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/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/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/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/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/2 (cos (* 2 phi1))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1) lambda1 lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+ 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) 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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) 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 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 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)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 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)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(+ (* -1 (pow lambda1 2)) (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(+ (* -1 (pow lambda1 2)) (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(+ (* -1 (pow lambda1 2)) (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))
(* -1 (pow lambda1 2))
(*.f64 (neg.f64 lambda1) lambda1)
(* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) 1))
(*.f64 (-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) 1))
(*.f64 (-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) 1))
(*.f64 (-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 lambda1 lambda1))
(* -1 (pow lambda1 2))
(*.f64 (neg.f64 lambda1) lambda1)
(* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) 1))
(*.f64 (-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) 1))
(*.f64 (-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2) (pow lambda1 2)) 1))
(*.f64 (-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 lambda1 lambda1))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(* -1 (pow phi1 2))
(*.f64 (neg.f64 phi1) phi1)
(* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))
(*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 phi1 phi1) #s(literal -1 binary64)) phi1) phi1)
(* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))
(*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -2/45 binary64) (*.f64 phi1 phi1) #s(literal 1/3 binary64)) phi1) phi1 #s(literal -1 binary64)) phi1) phi1)
(* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* (pow phi1 2) (- (* 1/315 (pow phi1 2)) 2/45)))) 1))
(*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 #s(literal 1/315 binary64) (*.f64 phi1 phi1) #s(literal -2/45 binary64)) phi1) phi1 #s(literal 1/3 binary64)) phi1) phi1 #s(literal -1 binary64)) phi1) phi1)
(* -1 (pow (sin phi1) 2))
(neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(* -1 (pow (sin phi1) 2))
(neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(* -1 (pow (sin phi1) 2))
(neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(* -1 (pow (sin phi1) 2))
(neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(* -1 (pow (sin phi1) 2))
(neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(* -1 (pow (sin phi1) 2))
(neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(* -1 (pow (sin phi1) 2))
(neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(* -1 (pow (sin phi1) 2))
(neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(* -1 (* phi1 (cos theta)))
(*.f64 (neg.f64 phi1) (cos.f64 theta))
(* phi1 (+ (* -1 (cos theta)) (* -1 (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))))))
(*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)) phi1) phi1 (cos.f64 theta))) phi1)
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))) (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))))
(*.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 theta) #s(literal 2/15 binary64)) phi1) phi1 (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)))) phi1) phi1 (neg.f64 (cos.f64 theta))) phi1)
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta))))))) (* -1 (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))))))))
(*.f64 (fma.f64 (fma.f64 (neg.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/144 binary64) (cos.f64 theta) (*.f64 (cos.f64 theta) #s(literal -29/5040 binary64))) phi1) phi1 (*.f64 (cos.f64 theta) #s(literal 2/15 binary64)))) (*.f64 phi1 phi1) (*.f64 (cos.f64 theta) #s(literal 2/3 binary64))) (*.f64 phi1 phi1) (neg.f64 (cos.f64 theta))) phi1)
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* -1 (* (cos phi1) (sin phi1)))
(*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1))
(+ (* -1 (* (cos phi1) (sin phi1))) (* 1/2 (* (pow theta 2) (* (cos phi1) (sin phi1)))))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 theta theta) #s(literal -1 binary64)))
(+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/2 (* (cos phi1) (sin phi1))))))
(fma.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1) (*.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)))
(+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (sin phi1))) (* 1/720 (* (pow theta 2) (* (cos phi1) (sin phi1)))))))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 theta theta) #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 theta theta) (*.f64 theta theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64)))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)) (pow.f64 (sin.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 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1) (*.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)) delta)) delta (-.f64 #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))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.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 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) delta (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (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 (fma.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))) phi1 (cos.f64 delta))) phi1 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta))) phi1 (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.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)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 theta theta) #s(literal -1 binary64)) (fma.f64 (neg.f64 (cos.f64 delta)) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.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)))))
(fma.f64 (neg.f64 (cos.f64 delta)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (+.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 theta theta) #s(literal -1 binary64)) (*.f64 (*.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)))
(- (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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(* (cos theta) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))
(fma.f64 (sin.f64 delta) (cos.f64 theta) (*.f64 phi1 (cos.f64 delta)))
(+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))
(fma.f64 (fma.f64 (*.f64 phi1 (*.f64 #s(literal -1/2 binary64) (cos.f64 theta))) (sin.f64 delta) (cos.f64 delta)) phi1 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(+ (* 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) (sin.f64 delta)) (cos.f64 theta))) phi1 (cos.f64 delta)) phi1 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(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 delta #s(literal -1/2 binary64)) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 theta))) 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 (*.f64 #s(literal -1/6 binary64) delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) #s(literal -1/2 binary64))) delta (*.f64 (cos.f64 phi1) (cos.f64 theta))) delta (sin.f64 phi1))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))
(fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 theta theta)) (cos.f64 phi1)) (sin.f64 delta) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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))))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 #s(literal 1/24 binary64) (*.f64 theta theta) #s(literal -1/2 binary64))) (*.f64 theta theta) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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)))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 #s(literal -1/720 binary64) (*.f64 theta theta) #s(literal 1/24 binary64))) (*.f64 theta theta))) (*.f64 theta theta) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)) (pow.f64 (sin.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 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1) (*.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)) delta)) delta (-.f64 #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))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.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 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) delta (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (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 (fma.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))) phi1 (cos.f64 delta))) phi1 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta))) phi1 (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.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)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 theta theta) #s(literal -1 binary64)) (fma.f64 (neg.f64 (cos.f64 delta)) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.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)))))
(fma.f64 (neg.f64 (cos.f64 delta)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (+.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 theta theta) #s(literal -1 binary64)) (*.f64 (*.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)))
(- (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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 (sin.f64 delta) phi1) (cos.f64 theta))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(*.f64 (fma.f64 (sin.f64 delta) (cos.f64 theta) (*.f64 phi1 (cos.f64 delta))) 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 (sin.f64 delta) (cos.f64 theta))) 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 (sin.f64 delta) (cos.f64 theta))) phi1)
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 delta (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)) (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 delta #s(literal -1/2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.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 (fma.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) delta (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))) delta (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(*.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 #s(literal -1/2 binary64) (*.f64 theta theta)) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1) (*.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 #s(literal 1/24 binary64) (*.f64 theta theta) #s(literal -1/2 binary64))) (*.f64 theta theta) (*.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (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 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* -1 (* phi1 (sin delta)))
(*.f64 (neg.f64 phi1) (sin.f64 delta))
(* phi1 (+ (* -1 (sin delta)) (* -1 (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* -1/6 (sin delta)))))))
(*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 delta) #s(literal -2/3 binary64)) phi1) phi1 (sin.f64 delta))) phi1)
(* phi1 (+ (* -1 (sin delta)) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (sin delta)) (+ (* 1/24 (sin delta)) (* 1/12 (sin delta)))))) (* -1 (+ (* -1/2 (sin delta)) (* -1/6 (sin delta))))))))
(*.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 delta) #s(literal 2/15 binary64)) phi1) phi1 (*.f64 (sin.f64 delta) #s(literal -2/3 binary64)))) phi1) phi1 (neg.f64 (sin.f64 delta))) phi1)
(* phi1 (+ (* -1 (sin delta)) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (sin delta)) (* -1/6 (sin delta)))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* -1/144 (sin delta)) (+ (* -1/240 (sin delta)) (+ (* -1/720 (sin delta)) (* -1/5040 (sin delta))))))) (* -1 (+ (* 1/120 (sin delta)) (+ (* 1/24 (sin delta)) (* 1/12 (sin delta)))))))))))
(*.f64 (fma.f64 (fma.f64 (neg.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/144 binary64) (sin.f64 delta) (*.f64 (sin.f64 delta) #s(literal -29/5040 binary64))) phi1) phi1 (*.f64 (sin.f64 delta) #s(literal 2/15 binary64)))) (*.f64 phi1 phi1) (*.f64 (sin.f64 delta) #s(literal 2/3 binary64))) (*.f64 phi1 phi1) (neg.f64 (sin.f64 delta))) phi1)
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* delta (* (cos phi1) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) delta))
(* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* 1/6 (* (pow delta 2) (* (cos phi1) (sin phi1))))))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 (*.f64 #s(literal 1/6 binary64) delta) delta #s(literal -1 binary64))) delta)
(* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow delta 2) (+ (* -1/120 (* (pow delta 2) (* (cos phi1) (sin phi1)))) (* 1/6 (* (cos phi1) (sin phi1)))))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 #s(literal -1/120 binary64) (*.f64 delta delta) #s(literal 1/6 binary64))) (*.f64 delta delta))) delta)
(* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow delta 2) (+ (* 1/6 (* (cos phi1) (sin phi1))) (* (pow delta 2) (+ (* -1/120 (* (cos phi1) (sin phi1))) (* 1/5040 (* (pow delta 2) (* (cos phi1) (sin phi1))))))))))
(*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 (*.f64 #s(literal 1/6 binary64) delta) delta #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 delta delta) (*.f64 delta delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 #s(literal 1/5040 binary64) (*.f64 delta delta) #s(literal -1/120 binary64))))) delta)
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)) (pow.f64 (sin.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 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1) (*.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)) delta)) delta (-.f64 #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))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.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 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) delta (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (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 (fma.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))) phi1 (cos.f64 delta))) phi1 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta))) phi1 (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.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)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 theta theta) #s(literal -1 binary64)) (fma.f64 (neg.f64 (cos.f64 delta)) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.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)))))
(fma.f64 (neg.f64 (cos.f64 delta)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (+.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 theta theta) #s(literal -1 binary64)) (*.f64 (*.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)))
(- (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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 (sin.f64 delta) phi1) (cos.f64 theta))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(*.f64 (fma.f64 (sin.f64 delta) (cos.f64 theta) (*.f64 phi1 (cos.f64 delta))) 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 (sin.f64 delta) (cos.f64 theta))) 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 (sin.f64 delta) (cos.f64 theta))) phi1)
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(*.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 #s(literal -1/2 binary64) (*.f64 theta theta)) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1) (*.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 #s(literal 1/24 binary64) (*.f64 theta theta) #s(literal -1/2 binary64))) (*.f64 theta theta) (*.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (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 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 delta (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)) (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 delta #s(literal -1/2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.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 (fma.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) delta (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))) delta (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))

rewrite358.0ms (2%)

Memory
10.6MiB live, 354.8MiB allocated
Rules
2 533×lower-*.f32
2 517×lower-*.f64
2 442×lower-fma.f32
2 438×lower-fma.f64
1 242×lower-/.f32
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
069656
0121606
1485564
23526564
08257564
Stop Event
iter limit
node limit
iter limit
Counts
27 → 773
Calls
Call 1
Inputs
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 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))))))) (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 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 (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 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))
(neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))
(*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1))
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 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))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(-.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 (sin.f64 delta) (cos.f64 theta)))))))
(asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))
(*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))
Outputs
(*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
(*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(*.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))
(*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))))
(*.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (-.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (-.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))) (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))) (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))) (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))) (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (*.f64 #s(literal 2 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))))) (*.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (*.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) #s(literal 1 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) #s(literal 1 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #s(literal 1 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #s(literal 1 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) #s(literal 2 binary64) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) #s(literal 2 binary64) (*.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))))) (*.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))) (*.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (*.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))))) (*.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) #s(literal 2 binary64) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))))) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))))) (*.f64 (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))) (*.f64 (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (*.f64 (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))))) (*.f64 (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) #s(literal 2 binary64) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) #s(literal 2 binary64) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (-.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.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 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (-.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (-.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (-.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))
(fma.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) (cos.f64 phi1) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (neg.f64 (sin.f64 phi1)))) (cos.f64 phi1) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 delta) (neg.f64 (sin.f64 phi1))) (sin.f64 phi1) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (sin.f64 phi1) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 delta) (neg.f64 (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (cos.f64 delta) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (neg.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (cos.f64 delta)))) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))
(fma.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))
(fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal -1 binary64) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (sin.f64 delta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (neg.f64 (sin.f64 phi1))) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 delta) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (cos.f64 delta))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.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 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (/.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (/.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))
(+.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))
(+.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(+.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))
(+.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(+.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(+.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1))))
(*.f64 (pow.f64 (/.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))))
(*.f64 (pow.f64 (/.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1) (*.f64 lambda1 lambda1)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)))))
(*.f64 (/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64)) (*.f64 (*.f64 lambda1 lambda1) lambda1))) (fma.f64 lambda1 (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))))
(*.f64 (/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (neg.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(*.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) #s(literal -1 binary64))
(/.f64 (-.f64 (neg.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (*.f64 (neg.f64 lambda1) lambda1)) (neg.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)))
(/.f64 (*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1)) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1) (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64))))
(/.f64 (*.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) #s(literal 1 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1)) #s(literal 1 binary64)) (*.f64 (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)))
(/.f64 (*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1) (*.f64 lambda1 lambda1))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)))
(/.f64 (-.f64 (*.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) (*.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1))) (pow.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1)) (*.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1) (*.f64 lambda1 lambda1))) (*.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (neg.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))
(neg.f64 (/.f64 (neg.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)))
(neg.f64 (/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(fma.f64 (pow.f64 (sqrt.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) #s(literal 1 binary64)) lambda1)
(fma.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64)) (*.f64 (*.f64 lambda1 lambda1) lambda1))) (fma.f64 lambda1 (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (neg.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(fma.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (neg.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(fma.f64 (sqrt.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) (sqrt.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) lambda1)
(fma.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) (neg.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) (neg.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))) #s(literal -1 binary64)))
(+.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) (neg.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))
(*.f64 (pow.f64 (sqrt.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) (sqrt.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))))
(pow.f64 (sqrt.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 1 binary64))
(exp.f64 (log.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (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 delta) (cos.f64 phi1)) (sin.f64 theta))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(*.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 delta phi1)) (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 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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) (*.f64 lambda1 lambda1))))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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(literal 3 binary64)))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #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 delta) (cos.f64 phi1)) (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 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal -1 binary64))
(/.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 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))))
(/.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 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(*.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (cos.f64 delta)))))
(*.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))))
(pow.f64 (/.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (cos.f64 delta)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 #s(literal 0 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (cos.f64 delta))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(fma.f64 (*.f64 (cos.f64 delta) (neg.f64 (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))
(fma.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (cos.f64 delta) (cos.f64 delta))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))
(fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (cos.f64 delta))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal -1 binary64) (cos.f64 delta))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (cos.f64 delta))
(fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (cos.f64 delta) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (cos.f64 delta))
(-.f64 (+.f64 (cos.f64 delta) #s(literal 0 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(-.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (cos.f64 delta)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 0 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (cos.f64 delta)))))
(-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (cos.f64 delta)))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(+.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (cos.f64 delta) (neg.f64 (sin.f64 phi1))) (sin.f64 phi1))
(*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (sin.f64 phi1))
(*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(*.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (cos.f64 delta))
(*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(*.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(*.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal -1 binary64))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)))
(*.f64 (cos.f64 delta) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))))
(neg.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(-.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(+.f64 #s(literal 0 binary64) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (sin.f64 phi1))
(pow.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) #s(literal -1 binary64))
(pow.f64 (neg.f64 (sin.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64)))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(fma.f64 (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 phi1)) #s(literal 2 binary64)))
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(*.f64 (pow.f64 (/.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))))
(*.f64 (pow.f64 (/.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1) (*.f64 lambda1 lambda1)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)))))
(*.f64 (/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64)) (*.f64 (*.f64 lambda1 lambda1) lambda1))) (fma.f64 lambda1 (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))))
(*.f64 (/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (neg.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(*.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) #s(literal -1 binary64))
(/.f64 (-.f64 (neg.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (*.f64 (neg.f64 lambda1) lambda1)) (neg.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)))
(/.f64 (*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1)) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1) (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64))))
(/.f64 (*.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) #s(literal 1 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1)) #s(literal 1 binary64)) (*.f64 (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)))
(/.f64 (*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1) (*.f64 lambda1 lambda1))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)))
(/.f64 (-.f64 (*.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) (*.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1))) (pow.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1)) (*.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1) (*.f64 lambda1 lambda1))) (*.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (neg.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))
(neg.f64 (/.f64 (neg.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)))
(neg.f64 (/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(fma.f64 (pow.f64 (sqrt.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) #s(literal 1 binary64)) lambda1)
(fma.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64)) (*.f64 (*.f64 lambda1 lambda1) lambda1))) (fma.f64 lambda1 (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (neg.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(fma.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (neg.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(fma.f64 (sqrt.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) (sqrt.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) lambda1)
(fma.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) (neg.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) (neg.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))) #s(literal -1 binary64)))
(+.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) (neg.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))
(*.f64 (pow.f64 (/.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))))
(*.f64 (pow.f64 (/.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1) (*.f64 lambda1 lambda1)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)))))
(*.f64 (/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64)) (*.f64 (*.f64 lambda1 lambda1) lambda1))) (fma.f64 lambda1 (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))))
(*.f64 (/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (neg.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(*.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) #s(literal -1 binary64))
(/.f64 (-.f64 (neg.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (*.f64 (neg.f64 lambda1) lambda1)) (neg.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)))
(/.f64 (*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1)) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1) (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64))))
(/.f64 (*.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) #s(literal 1 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1)) #s(literal 1 binary64)) (*.f64 (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)))
(/.f64 (*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1) (*.f64 lambda1 lambda1))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)))
(/.f64 (-.f64 (*.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) (*.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1))) (pow.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1)) (*.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1) (*.f64 lambda1 lambda1))) (*.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (neg.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))
(neg.f64 (/.f64 (neg.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)))
(neg.f64 (/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(fma.f64 (pow.f64 (sqrt.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) #s(literal 1 binary64)) lambda1)
(fma.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64)) (*.f64 (*.f64 lambda1 lambda1) lambda1))) (fma.f64 lambda1 (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (neg.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(fma.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (neg.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(fma.f64 (sqrt.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) (sqrt.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) lambda1)
(fma.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) (neg.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) (neg.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))) #s(literal -1 binary64)))
(+.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)) (neg.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))
(*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1)) (/.f64 #s(literal 1 binary64) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))))
(*.f64 (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))
(*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1) (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)))))
(pow.f64 (/.f64 (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64))) (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1) (*.f64 lambda1 lambda1)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1))) (neg.f64 (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1) (*.f64 lambda1 lambda1)))) (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1)) (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (*.f64 (neg.f64 lambda1) lambda1)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1)) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64))) (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1) (*.f64 lambda1 lambda1))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1) (*.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (*.f64 (neg.f64 lambda1) lambda1)))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1) (*.f64 lambda1 lambda1))) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64))))
(fma.f64 #s(literal -1 binary64) (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))
(fma.f64 (neg.f64 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))
(fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (*.f64 (neg.f64 lambda1) lambda1))
(fma.f64 lambda1 (neg.f64 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 6 binary64)) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)))))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(+.f64 (*.f64 (neg.f64 lambda1) lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))
(+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (*.f64 (neg.f64 lambda1) lambda1))
(*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))))
(pow.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))
(exp.f64 (*.f64 (*.f64 (log.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) #s(literal 2 binary64)))
(atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))
(*.f64 (pow.f64 (sqrt.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) (sqrt.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))))
(pow.f64 (sqrt.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 1 binary64))
(exp.f64 (log.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))))
(*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal -1 binary64)) (sin.f64 phi1))
(*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (cos.f64 theta))
(*.f64 (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))
(*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))))
(*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))))
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
(*.f64 (sin.f64 phi1) (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 theta phi1))) (neg.f64 (sin.f64 phi1))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 theta phi1))) (neg.f64 (sin.f64 phi1))) #s(literal 2 binary64))
(/.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 theta phi1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 theta phi1)))) #s(literal 2 binary64))
(neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.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 (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(fma.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(fma.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (acos.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (acos.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(-.f64 (*.f64 (sin.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64))))) #s(literal 1 binary64)))
(-.f64 (*.f64 #s(literal 1 binary64) #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64))))))
(cos.f64 (acos.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (acos.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (acos.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(+.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (cos.f64 delta))))
(*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(pow.f64 (/.f64 (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (cos.f64 delta)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (cos.f64 delta)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (cos.f64 delta)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))
(fma.f64 (neg.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (neg.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (cos.f64 delta))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 (pow.f64 (*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(-.f64 (cos.f64 delta) (*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))
(+.f64 (*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1))))
(asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (acos.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (acos.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (acos.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (acos.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (acos.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(-.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64)))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (acos.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (cos.f64 (+.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) phi1))) #s(literal 1/2 binary64))
(*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (cos.f64 (+.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) phi1)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (cos.f64 (+.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) phi1)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) phi1)) (cos.f64 (+.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) phi1))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (cos.f64 (+.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) phi1)))))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (cos.f64 (+.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) phi1))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))) phi1)) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) #s(literal -1 binary64)) (sin.f64 phi1))
(*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (sin.f64 delta))
(*.f64 (*.f64 (sin.f64 delta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))
(*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 phi1)))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (neg.f64 (sin.f64 phi1)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (neg.f64 (sin.f64 phi1))))
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(*.f64 (sin.f64 phi1) (neg.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1))))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 delta phi1))) (neg.f64 (sin.f64 phi1))) #s(literal 2 binary64))
(/.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 delta phi1)))) #s(literal 2 binary64))
(neg.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 phi1)))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 phi1)))
(*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
(*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(*.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))
(*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))))
(*.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (-.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (-.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))) (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))) (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))) (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))) (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (*.f64 #s(literal 2 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))))) (*.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (*.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) #s(literal 1 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) #s(literal 1 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #s(literal 1 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #s(literal 1 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) #s(literal 2 binary64) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) #s(literal 2 binary64) (*.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))))) (*.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))) (*.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (*.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))))) (*.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) #s(literal 2 binary64) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))))) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))))) (*.f64 (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))) (*.f64 (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (*.f64 (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))))) (*.f64 (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) #s(literal 2 binary64) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) #s(literal 2 binary64) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (-.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.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 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (-.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (-.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (-.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))
(fma.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) (cos.f64 phi1) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (neg.f64 (sin.f64 phi1)))) (cos.f64 phi1) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 delta) (neg.f64 (sin.f64 phi1))) (sin.f64 phi1) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (sin.f64 phi1) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 delta) (neg.f64 (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (cos.f64 delta) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (neg.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (cos.f64 delta)))) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))
(fma.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))
(fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal -1 binary64) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (sin.f64 delta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (neg.f64 (sin.f64 phi1))) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 delta) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (cos.f64 delta))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.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 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (/.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (/.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))
(+.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))
(+.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(+.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))
(+.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(+.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(+.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1))))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1))) #s(literal 1/2 binary64))
(*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)))) #s(literal -1 binary64))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (sin.f64 phi1)) (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(/.f64 (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)))) (sin.f64 phi1)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #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 delta) (sin.f64 phi1)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))))
(/.f64 (*.f64 (sin.f64 phi1) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(/.f64 (*.f64 (sin.f64 phi1) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))))) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(/.f64 (*.f64 (sin.f64 phi1) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))))
(/.f64 (*.f64 (sin.f64 phi1) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)))))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1))) #s(literal 2 binary64))
(fma.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1)))
(+.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))

eval519.0ms (2.9%)

Memory
35.3MiB live, 581.6MiB allocated
Compiler

Compiled 157 244 to 4 626 computations (97.1% saved)

prune525.0ms (3%)

Memory
-9.9MiB live, 596.8MiB allocated
Pruning

47 alts after pruning (46 fresh and 1 done)

PrunedKeptTotal
New2 362372 399
Fresh15924
Picked415
Done000
Total2 381472 428
Accuracy
100.0%
Counts
2 428 → 47
Alt Table
Click to see full alt table
StatusAccuracyProgram
38.4%
(/.f64 (-.f64 (pow.f64 (pow.f64 (sqrt.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.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) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1))
70.3%
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)))) lambda1))
70.3%
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)))))) lambda1))
70.3%
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 #s(approx (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (+ (* (* (cos phi1) (cos theta)) (sin delta)) (* (cos delta) (sin phi1))) (sin phi1)))) (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))) lambda1))
48.1%
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1)) (*.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))))
59.1%
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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))
99.6%
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
88.0%
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
84.0%
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (sin.f64 theta) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 delta phi1)))) #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))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))
91.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.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)))) (/.f64 #s(literal 1 binary64) (fma.f64 (-.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 delta delta)))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))))) (cos.f64 delta))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))))
92.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 #s(approx (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 delta)))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
78.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
88.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (sin.f64 phi1) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (-.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))))
88.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (cos.f64 delta)))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
91.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)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
85.0%
(+.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 (sin.f64 delta) phi1) (cos.f64 theta))))))
80.4%
(+.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 (sin.f64 phi1) (fma.f64 (fma.f64 (*.f64 theta theta) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
83.7%
(+.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 (sin.f64 phi1) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
76.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))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
93.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))))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))))
77.6%
(+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
77.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))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) delta (cos.f64 phi1))))))
87.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))))))) (cos.f64 delta))))
71.2%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 theta) (*.f64 (*.f64 (*.f64 delta delta) (*.f64 delta delta)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))))) 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))))
70.9%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) 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))))
72.1%
(+.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))))))) (cos.f64 delta))))
74.4%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) 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 (fma.f64 (*.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (cos.f64 phi1))) delta)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))))
71.3%
(+.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)) #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)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))))
74.0%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))))
71.1%
(+.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))))))) (cos.f64 delta))))
87.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))))
86.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.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 (sin.f64 delta) (cos.f64 theta)))))))))
86.4%
(+.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))))
44.6%
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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) (*.f64 lambda1 lambda1))))
58.9%
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
35.1%
#s(approx (/ (- (pow (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (+ (* (* (cos phi1) (cos theta)) (sin delta)) (* (cos delta) (sin phi1))) (sin phi1)))) 2) (* lambda1 lambda1)) (- (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (+ (* (* (cos phi1) (cos theta)) (sin delta)) (* (cos delta) (sin phi1))) (sin phi1)))) lambda1)) (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
35.2%
#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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
Compiler

Compiled 4 193 to 2 207 computations (47.4% saved)

simplify258.0ms (1.5%)

Memory
-14.2MiB live, 143.4MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))))
cost-diff192
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))
cost-diff6528
(+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))
cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
cost-diff128
(neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
cost-diff192
(+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
cost-diff128
(fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
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
(*.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 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))))
cost-diff6272
(fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))
Rules
6 236×lower-fma.f32
6 229×lower-fma.f64
1 542×lower-*.f32
1 532×lower-*.f64
1 054×lower--.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
073880
0124876
1209862
2410859
3925855
41977850
53143850
64271850
75162850
85656850
96009850
106825850
117506850
127805850
08078831
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)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (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 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))
#s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(neg.f64 (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)
(cos.f64 delta)
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
(neg.f64 (sin.f64 phi1))
(*.f64 (cos.f64 theta) (cos.f64 phi1))
(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))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (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
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64))
(neg.f64 phi1)
#s(literal 1 binary64)
(cos.f64 delta)
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(cos.f64 theta)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (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 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(cos.f64 theta)
(*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
#s(literal -1/2 binary64)
(cos.f64 (+.f64 phi1 phi1))
(+.f64 phi1 phi1)
#s(literal 1/2 binary64)
#s(literal 1 binary64)
(cos.f64 delta)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (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 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(cos.f64 theta)
(+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))
(neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
#s(literal 2 binary64)
(cos.f64 delta)
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (-.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #s(literal -1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1))))) lambda1)
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (-.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #s(literal -1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (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
(fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))
(fma.f64 (-.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #s(literal -1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1))))
#s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(neg.f64 (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)
(cos.f64 delta)
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta))
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
(*.f64 (*.f64 (neg.f64 (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))
(neg.f64 (sin.f64 phi1))
(*.f64 (cos.f64 theta) (cos.f64 phi1))
(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))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.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))))))) (neg.f64 (fma.f64 (fma.f64 phi1 phi1 #s(literal -1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) phi1) (sin.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))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(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))))))) (neg.f64 (fma.f64 (fma.f64 phi1 phi1 #s(literal -1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) 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
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (neg.f64 (fma.f64 (fma.f64 phi1 phi1 #s(literal -1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) phi1) (sin.f64 delta)))))
(fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(neg.f64 (fma.f64 (fma.f64 phi1 phi1 #s(literal -1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) phi1) (sin.f64 delta))))
(fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64))
(neg.f64 phi1)
#s(literal 1 binary64)
(cos.f64 delta)
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(*.f64 (neg.f64 (cos.f64 theta)) (*.f64 phi1 (sin.f64 delta)))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(cos.f64 theta)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1))))) lambda1)
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (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
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1))))
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(cos.f64 theta)
(*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))
(+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
#s(literal -1/2 binary64)
(cos.f64 (+.f64 phi1 phi1))
(+.f64 phi1 phi1)
#s(literal 1/2 binary64)
#s(literal 1 binary64)
(cos.f64 delta)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta))) lambda1)
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (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
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))
(fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta))
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(cos.f64 theta)
(+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta))
(neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(*.f64 (neg.f64 (cos.f64 delta)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))
(*.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
#s(literal 2 binary64)
(cos.f64 delta)

localize470.0ms (2.7%)

Memory
27.6MiB live, 573.7MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.203125
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy0.213222509768442
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
accuracy0.26400375976844204
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
accuracy0.5111282462028861
(+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))
accuracy0.203125
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy0.213222509768442
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
accuracy0.45338389321931016
(+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
accuracy15.383520525507778
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
accuracy0.16015625
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
accuracy0.16796875
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
accuracy0.203125
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy31.49044725645308
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
accuracy0.1171875
(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.203125
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy23.690477118170133
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
accuracy26.507005228428095
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
accuracy0.203125
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy0.2265625
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
accuracy0.26400375976844204
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
accuracy0.4793217968389034
(fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))
Samples
153.0ms88×2valid
95.0ms130×0valid
64.0ms38×1valid
Compiler

Compiled 803 to 67 computations (91.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 231.0ms
ival-mult: 49.0ms (21.2% of total)
ival-add: 46.0ms (19.9% of total)
ival-cos: 41.0ms (17.8% of total)
adjust: 34.0ms (14.7% of total)
ival-sin: 30.0ms (13% of total)
ival-atan2: 12.0ms (5.2% of total)
ival-neg: 7.0ms (3% of total)
ival-asin: 6.0ms (2.6% of total)
ival-pow2: 4.0ms (1.7% of total)
ival-sub: 2.0ms (0.9% of total)
exact: 1.0ms (0.4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series86.0ms (0.5%)

Memory
0.6MiB live, 114.3MiB allocated
Counts
26 → 852
Calls
Call 1
Inputs
#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())
#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())
#s(alt (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))) (patch (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))) #<representation binary64>) () ())
#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())
#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())
#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())
#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())
#s(alt (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())
#s(alt (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())
#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())
#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())
#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())
#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())
#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())
Outputs
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta)))))) (taylor 0 phi1) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))))))))) (taylor 0 phi1) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf phi1) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf phi1) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf phi1) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf phi1) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (pow (sin phi1) 2))) (taylor 0 delta) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* -1 (pow (sin phi1) 2)))) (taylor 0 delta) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/2 (pow (sin phi1) 2)) 1/2)))))) (taylor 0 delta) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ 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)))))) (taylor 0 delta) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor 0 theta) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))))) (taylor 0 theta) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (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)))))))))))) (taylor 0 theta) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) (patch (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta)))))))) (taylor 0 theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* 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))))))))) (taylor 0 theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))) (taylor 0 delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta)))))))) (taylor 0 delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* 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))))))))) (taylor 0 delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* -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))) (taylor -inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* -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))) (taylor -inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* -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))) (taylor -inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta)))))))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* 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))))))))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta)))))))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* 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))))))))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta))) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta))))))) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)))))))) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta))))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta)))))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta))))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta)))))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta)))))) (taylor 0 phi1) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta)))))) (taylor 0 phi1) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow phi1 2) (cos delta))) (taylor inf phi1) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ (* -1 (cos delta)) (* -1 (/ (* (cos theta) (sin delta)) phi1)))) (taylor inf phi1) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ (* -1 (cos delta)) (+ (* -1 (/ (* (cos theta) (sin delta)) phi1)) (/ (cos delta) (pow phi1 2))))) (taylor inf phi1) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ (* -1 (cos delta)) (+ (* -1 (/ (* (cos theta) (sin delta)) phi1)) (/ (cos delta) (pow phi1 2))))) (taylor inf phi1) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow phi1 2) (cos delta))) (taylor -inf phi1) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ (* -1 (cos delta)) (* -1 (/ (* (cos theta) (sin delta)) phi1)))) (taylor -inf phi1) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ (* -1 (cos delta)) (* -1 (/ (+ (* -1 (/ (cos delta) phi1)) (* (cos theta) (sin delta))) phi1)))) (taylor -inf phi1) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ (* -1 (cos delta)) (* -1 (/ (+ (* -1 (/ (cos delta) phi1)) (* (cos theta) (sin delta))) phi1)))) (taylor -inf phi1) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (pow phi1 2))) (taylor 0 delta) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (* delta (* phi1 (cos theta)))) (* -1 (pow phi1 2)))) (taylor 0 delta) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (pow phi1 2)) (* delta (+ (* -1 (* phi1 (cos theta))) (* -1/2 (* delta (+ 1 (* -1 (pow phi1 2))))))))) (taylor 0 delta) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (pow phi1 2)) (* delta (+ (* -1 (* phi1 (cos theta))) (* delta (+ (* -1/2 (+ 1 (* -1 (pow phi1 2)))) (* 1/6 (* delta (* phi1 (cos theta)))))))))) (taylor 0 delta) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2))))) (taylor inf delta) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2))))) (taylor inf delta) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2))))) (taylor inf delta) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2))))) (taylor inf delta) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2))))) (taylor -inf delta) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2))))) (taylor -inf delta) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2))))) (taylor -inf delta) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2))))) (taylor -inf delta) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi1 (sin delta))) (* (cos delta) (+ 1 (* -1 (pow phi1 2))))) (taylor 0 theta) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi1 (sin delta))) (+ (* 1/2 (* phi1 (* (pow theta 2) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))) (taylor 0 theta) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi1 (sin delta))) (+ (* (cos delta) (+ 1 (* -1 (pow phi1 2)))) (* (pow theta 2) (+ (* -1/24 (* phi1 (* (pow theta 2) (sin delta)))) (* 1/2 (* phi1 (sin delta))))))) (taylor 0 theta) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi1 (sin delta))) (+ (* (cos delta) (+ 1 (* -1 (pow phi1 2)))) (* (pow theta 2) (+ (* 1/2 (* phi1 (sin delta))) (* (pow theta 2) (+ (* -1/24 (* phi1 (sin delta))) (* 1/720 (* phi1 (* (pow theta 2) (sin delta)))))))))) (taylor 0 theta) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2))))) (taylor inf theta) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2))))) (taylor inf theta) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2))))) (taylor inf theta) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2))))) (taylor inf theta) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2))))) (taylor -inf theta) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2))))) (taylor -inf theta) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2))))) (taylor -inf theta) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2))))) (taylor -inf theta) (#s(alt (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (patch (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 lambda1) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (* -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))) (taylor -inf lambda1) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (* -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))) (taylor -inf lambda1) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (* -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))) (taylor -inf lambda1) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (+.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (pow phi1 2))) (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))) (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))) (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* -1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* -1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* -1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* -1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow phi1 2)) (taylor 0 phi1) (#s(alt (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)) (taylor 0 phi1) (#s(alt (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)) (taylor 0 phi1) (#s(alt (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* (pow phi1 2) (- (* 1/315 (pow phi1 2)) 2/45)))) 1)) (taylor 0 phi1) (#s(alt (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (taylor inf phi1) (#s(alt (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (taylor inf phi1) (#s(alt (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (taylor inf phi1) (#s(alt (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (taylor inf phi1) (#s(alt (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (taylor -inf phi1) (#s(alt (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (taylor -inf phi1) (#s(alt (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (taylor -inf phi1) (#s(alt (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (taylor -inf phi1) (#s(alt (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (pow phi1 2) (cos delta)))) (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta)))) (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta)))) (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* (pow delta 2) (+ 1/2 (* -1/2 (pow (sin phi1) 2)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (pow (sin phi1) 2)))) (+ 1/2 (* -1/2 (pow (sin phi1) 2)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (pow (sin phi1) 2)))))) (* 1/24 (pow (sin phi1) 2)))) (+ 1/2 (* -1/2 (pow (sin phi1) 2)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor inf delta) (#s(alt (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor inf delta) (#s(alt (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor inf delta) (#s(alt (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor inf delta) (#s(alt (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor -inf delta) (#s(alt (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor -inf delta) (#s(alt (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor -inf delta) (#s(alt (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor -inf delta) (#s(alt (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta)))))) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta)))))) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (+ (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* -1 (* (cos phi1) (* (cos theta) (sin phi1))))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2)))))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))) (taylor inf delta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))) (taylor inf delta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))) (taylor inf delta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))) (taylor inf delta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))) (taylor -inf delta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))) (taylor -inf delta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))) (taylor -inf delta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))) (taylor -inf delta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (sin phi1) 2))) (taylor 0 theta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (cos delta) (pow (sin phi1) 2))) (taylor 0 theta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (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))) (taylor 0 theta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (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) (pow (sin phi1) 2))) (taylor 0 theta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))) (taylor inf theta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))) (taylor inf theta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))) (taylor inf theta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))) (taylor inf theta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))) (taylor -inf theta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))) (taylor -inf theta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))) (taylor -inf theta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))) (taylor -inf theta) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (pow phi1 2) (taylor 0 phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2)))) (taylor 0 phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3)))) (taylor 0 phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3)))) (taylor 0 phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor -inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor -inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor -inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor -inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (cos theta))) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (cos theta)) (* -1 (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))) (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))))))) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta))))))) (* -1 (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta))))))))))) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (sin phi1))) (taylor 0 theta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (sin phi1))) (* 1/2 (* (pow theta 2) (* (cos phi1) (sin phi1))))) (taylor 0 theta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/2 (* (cos phi1) (sin phi1)))))) (taylor 0 theta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (sin phi1))) (* 1/720 (* (pow theta 2) (* (cos phi1) (sin phi1))))))))) (taylor 0 theta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf theta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf theta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf theta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf theta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf theta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf theta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf theta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf theta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ 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)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ (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))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ (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))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 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)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (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))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (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))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (* (cos theta) (sin delta)))) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (* (cos theta) (sin delta)))) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (* (cos theta) (sin delta)))) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (* (cos theta) (sin delta)))) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* delta (* phi1 (cos theta)))) (taylor 0 delta) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1 (* phi1 (cos theta))) (* 1/6 (* (pow delta 2) (* phi1 (cos theta)))))) (taylor 0 delta) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1 (* phi1 (cos theta))) (* (pow delta 2) (+ (* -1/120 (* (pow delta 2) (* phi1 (cos theta)))) (* 1/6 (* phi1 (cos theta))))))) (taylor 0 delta) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1 (* phi1 (cos theta))) (* (pow delta 2) (+ (* 1/6 (* phi1 (cos theta))) (* (pow delta 2) (+ (* -1/120 (* phi1 (cos theta))) (* 1/5040 (* (pow delta 2) (* phi1 (cos theta)))))))))) (taylor 0 delta) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (sin delta))) (taylor 0 theta) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi1 (sin delta))) (* 1/2 (* phi1 (* (pow theta 2) (sin delta))))) (taylor 0 theta) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi1 (sin delta))) (* (pow theta 2) (+ (* -1/24 (* phi1 (* (pow theta 2) (sin delta)))) (* 1/2 (* phi1 (sin delta)))))) (taylor 0 theta) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi1 (sin delta))) (* (pow theta 2) (+ (* 1/2 (* phi1 (sin delta))) (* (pow theta 2) (+ (* -1/24 (* phi1 (sin delta))) (* 1/720 (* phi1 (* (pow theta 2) (sin delta))))))))) (taylor 0 theta) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (patch (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (pow phi1 2) (taylor 0 phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2)))) (taylor 0 phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3)))) (taylor 0 phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3)))) (taylor 0 phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (sin delta))) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (sin delta)) (* -1 (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* -1/6 (sin delta))))))) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (sin delta)) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (sin delta)) (+ (* 1/24 (sin delta)) (* 1/12 (sin delta)))))) (* -1 (+ (* -1/2 (sin delta)) (* -1/6 (sin delta)))))))) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (sin delta)) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (sin delta)) (* -1/6 (sin delta)))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* -1/144 (sin delta)) (+ (* -1/240 (sin delta)) (+ (* -1/720 (sin delta)) (* -1/5040 (sin delta))))))) (* -1 (+ (* 1/120 (sin delta)) (+ (* 1/24 (sin delta)) (* 1/12 (sin delta))))))))))) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* delta (* (cos phi1) (sin phi1)))) (taylor 0 delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* 1/6 (* (pow delta 2) (* (cos phi1) (sin phi1)))))) (taylor 0 delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow delta 2) (+ (* -1/120 (* (pow delta 2) (* (cos phi1) (sin phi1)))) (* 1/6 (* (cos phi1) (sin phi1))))))) (taylor 0 delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow delta 2) (+ (* 1/6 (* (cos phi1) (sin phi1))) (* (pow delta 2) (+ (* -1/120 (* (cos phi1) (sin phi1))) (* 1/5040 (* (pow delta 2) (* (cos phi1) (sin phi1)))))))))) (taylor 0 delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor inf delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor inf delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor inf delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor inf delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor -inf delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor -inf delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor -inf delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor -inf delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
Calls

213 calls:

TimeVariablePointExpression
4.0ms
theta
@-inf
(+ (* (+ (* (neg phi1) phi1) 1) (cos delta)) (* (neg phi1) (* (sin delta) (cos theta))))
1.0ms
delta
@inf
(+ (* (+ (* (neg phi1) phi1) 1) (cos delta)) (* (neg phi1) (* (sin delta) (cos theta))))
1.0ms
theta
@inf
(+ (* (+ (* (neg phi1) phi1) 1) (cos delta)) (* (neg phi1) (* (sin delta) (cos theta))))
1.0ms
phi1
@0
(* (neg phi1) (* (sin delta) (cos theta)))
1.0ms
delta
@-inf
(+ (* (+ (* (neg phi1) phi1) 1) (cos delta)) (* (neg phi1) (* (sin delta) (cos theta))))

simplify522.0ms (3%)

Memory
-1.7MiB live, 399.5MiB allocated
Algorithm
egg-herbie
Rules
8 127×lower-fma.f64
8 127×lower-fma.f32
3 727×lower-*.f64
3 727×lower-*.f32
2 076×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
059220977
1207919192
2714919104
0814618327
Stop Event
iter limit
node limit
Counts
852 → 842
Calls
Call 1
Inputs
(cos delta)
(+ (cos delta) (* -1 (* phi1 (* (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) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin 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))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (sin delta) (sin phi1))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (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 (* (cos delta) (pow (sin phi1) 2))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (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) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (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)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin 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)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (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 phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(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 (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)))
(* 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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 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)))
(* -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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(+ lambda1 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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 phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin 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)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (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 phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* 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))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (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))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(cos delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))
(+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))
(* -1 (* (pow phi1 2) (cos delta)))
(* (pow phi1 2) (+ (* -1 (cos delta)) (* -1 (/ (* (cos theta) (sin delta)) phi1))))
(* (pow phi1 2) (+ (* -1 (cos delta)) (+ (* -1 (/ (* (cos theta) (sin delta)) phi1)) (/ (cos delta) (pow phi1 2)))))
(* (pow phi1 2) (+ (* -1 (cos delta)) (+ (* -1 (/ (* (cos theta) (sin delta)) phi1)) (/ (cos delta) (pow phi1 2)))))
(* -1 (* (pow phi1 2) (cos delta)))
(* (pow phi1 2) (+ (* -1 (cos delta)) (* -1 (/ (* (cos theta) (sin delta)) phi1))))
(* (pow phi1 2) (+ (* -1 (cos delta)) (* -1 (/ (+ (* -1 (/ (cos delta) phi1)) (* (cos theta) (sin delta))) phi1))))
(* (pow phi1 2) (+ (* -1 (cos delta)) (* -1 (/ (+ (* -1 (/ (cos delta) phi1)) (* (cos theta) (sin delta))) phi1))))
(+ 1 (* -1 (pow phi1 2)))
(+ 1 (+ (* -1 (* delta (* phi1 (cos theta)))) (* -1 (pow phi1 2))))
(+ 1 (+ (* -1 (pow phi1 2)) (* delta (+ (* -1 (* phi1 (cos theta))) (* -1/2 (* delta (+ 1 (* -1 (pow phi1 2)))))))))
(+ 1 (+ (* -1 (pow phi1 2)) (* delta (+ (* -1 (* phi1 (cos theta))) (* delta (+ (* -1/2 (+ 1 (* -1 (pow phi1 2)))) (* 1/6 (* delta (* phi1 (cos theta))))))))))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(+ (* -1 (* phi1 (sin delta))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(+ (* -1 (* phi1 (sin delta))) (+ (* 1/2 (* phi1 (* (pow theta 2) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2))))))
(+ (* -1 (* phi1 (sin delta))) (+ (* (cos delta) (+ 1 (* -1 (pow phi1 2)))) (* (pow theta 2) (+ (* -1/24 (* phi1 (* (pow theta 2) (sin delta)))) (* 1/2 (* phi1 (sin delta)))))))
(+ (* -1 (* phi1 (sin delta))) (+ (* (cos delta) (+ 1 (* -1 (pow phi1 2)))) (* (pow theta 2) (+ (* 1/2 (* phi1 (sin delta))) (* (pow theta 2) (+ (* -1/24 (* phi1 (sin delta))) (* 1/720 (* phi1 (* (pow theta 2) (sin delta))))))))))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(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 (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)))
(* 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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 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)))
(* -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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(+ lambda1 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
1
(+ 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)))
(- 1/2 (* -1/2 (cos (* 2 phi1))))
(- 1/2 (* -1/2 (cos (* 2 phi1))))
(- 1/2 (* -1/2 (cos (* 2 phi1))))
(- 1/2 (* -1/2 (cos (* 2 phi1))))
(- 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(- 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(- 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(- 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(* -1 (pow phi1 2))
(* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))
(* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))
(* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* (pow phi1 2) (- (* 1/315 (pow phi1 2)) 2/45)))) 1))
(* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))
(* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))
(* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))
(* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))
(* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))
(* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))
(* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))
(* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1))))))))
(cos delta)
(+ (cos delta) (* -1 (* (pow phi1 2) (cos delta))))
(+ (cos delta) (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta))))
(+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta))))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(- 1 (pow (sin phi1) 2))
(- (+ 1 (* -1 (* (pow delta 2) (+ 1/2 (* -1/2 (pow (sin phi1) 2)))))) (pow (sin phi1) 2))
(- (+ 1 (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (pow (sin phi1) 2)))) (+ 1/2 (* -1/2 (pow (sin phi1) 2)))))) (pow (sin phi1) 2))
(- (+ 1 (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (pow (sin phi1) 2)))))) (* 1/24 (pow (sin phi1) 2)))) (+ 1/2 (* -1/2 (pow (sin phi1) 2)))))) (pow (sin phi1) 2))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(cos delta)
(+ (cos delta) (* -1 (* phi1 (* (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 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (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))))) (* -1 (* (cos phi1) (* (cos theta) (sin phi1))))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2)))))))) (pow (sin phi1) 2))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (sin phi1) 2)))
(- (+ (cos delta) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (cos delta) (pow (sin phi1) 2)))
(- (+ (cos delta) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (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 delta) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (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) (pow (sin phi1) 2)))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(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))))
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(* -1 (* phi1 (cos theta)))
(* phi1 (+ (* -1 (cos theta)) (* -1 (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))))))
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))) (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))))
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta))))))) (* -1 (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))))))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (sin phi1)))
(+ (* -1 (* (cos phi1) (sin phi1))) (* 1/2 (* (pow theta 2) (* (cos phi1) (sin phi1)))))
(+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/2 (* (cos phi1) (sin phi1))))))
(+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (sin phi1))) (* 1/720 (* (pow theta 2) (* (cos phi1) (sin phi1)))))))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin 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))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (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)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (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))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (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)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(* -1 (* delta (* phi1 (cos theta))))
(* delta (+ (* -1 (* phi1 (cos theta))) (* 1/6 (* (pow delta 2) (* phi1 (cos theta))))))
(* delta (+ (* -1 (* phi1 (cos theta))) (* (pow delta 2) (+ (* -1/120 (* (pow delta 2) (* phi1 (cos theta)))) (* 1/6 (* phi1 (cos theta)))))))
(* delta (+ (* -1 (* phi1 (cos theta))) (* (pow delta 2) (+ (* 1/6 (* phi1 (cos theta))) (* (pow delta 2) (+ (* -1/120 (* phi1 (cos theta))) (* 1/5040 (* (pow delta 2) (* phi1 (cos theta))))))))))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(* -1 (* phi1 (sin delta)))
(+ (* -1 (* phi1 (sin delta))) (* 1/2 (* phi1 (* (pow theta 2) (sin delta)))))
(+ (* -1 (* phi1 (sin delta))) (* (pow theta 2) (+ (* -1/24 (* phi1 (* (pow theta 2) (sin delta)))) (* 1/2 (* phi1 (sin delta))))))
(+ (* -1 (* phi1 (sin delta))) (* (pow theta 2) (+ (* 1/2 (* phi1 (sin delta))) (* (pow theta 2) (+ (* -1/24 (* phi1 (sin delta))) (* 1/720 (* phi1 (* (pow theta 2) (sin delta)))))))))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(* -1 (* phi1 (* (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))))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(* -1 (* phi1 (sin delta)))
(* phi1 (+ (* -1 (sin delta)) (* -1 (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* -1/6 (sin delta)))))))
(* phi1 (+ (* -1 (sin delta)) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (sin delta)) (+ (* 1/24 (sin delta)) (* 1/12 (sin delta)))))) (* -1 (+ (* -1/2 (sin delta)) (* -1/6 (sin delta))))))))
(* phi1 (+ (* -1 (sin delta)) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (sin delta)) (* -1/6 (sin delta)))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* -1/144 (sin delta)) (+ (* -1/240 (sin delta)) (+ (* -1/720 (sin delta)) (* -1/5040 (sin delta))))))) (* -1 (+ (* 1/120 (sin delta)) (+ (* 1/24 (sin delta)) (* 1/12 (sin delta)))))))))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* delta (* (cos phi1) (sin phi1))))
(* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* 1/6 (* (pow delta 2) (* (cos phi1) (sin phi1))))))
(* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow delta 2) (+ (* -1/120 (* (pow delta 2) (* (cos phi1) (sin phi1)))) (* 1/6 (* (cos phi1) (sin phi1)))))))
(* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow delta 2) (+ (* 1/6 (* (cos phi1) (sin phi1))) (* (pow delta 2) (+ (* -1/120 (* (cos phi1) (sin phi1))) (* 1/5040 (* (pow delta 2) (* (cos phi1) (sin phi1))))))))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
Outputs
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (cos.f64 delta))
(+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (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) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ 1 (* -1 (pow (sin phi1) 2)))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(+ 1 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* -1 (pow (sin phi1) 2))))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1) (pow.f64 (sin.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 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1) (*.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)) delta)) delta (-.f64 #s(literal 1 binary64) (pow.f64 (sin.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 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1) (*.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) delta)) delta (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (sin delta) (sin phi1))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(fma.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta) (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 theta theta) #s(literal -1 binary64)) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (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 (*.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))) theta) theta (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (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 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta) (+.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 theta theta) #s(literal -1 binary64)) (*.f64 (*.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)))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) lambda1 lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (*.f64 #s(literal -1/6 binary64) 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 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 (*.f64 theta theta) (*.f64 theta theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))))) theta)
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* delta (* (cos phi1) (sin theta)))
(*.f64 (*.f64 delta (cos.f64 phi1)) (sin.f64 theta))
(* 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))))))))
(*.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) delta) delta #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (cos.f64 phi1)) (*.f64 (*.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))) delta)
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (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 (*.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)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 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)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) 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 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 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)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 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)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (*.f64 #s(literal -1/6 binary64) 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 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 (*.f64 theta theta) (*.f64 theta theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))))) theta)
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* delta (* (cos phi1) (sin theta)))
(*.f64 (*.f64 delta (cos.f64 phi1)) (sin.f64 theta))
(* 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))))))))
(*.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) delta) delta #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (cos.f64 phi1)) (*.f64 (*.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))) delta)
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (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 (*.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)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* theta (sin delta))
(*.f64 (sin.f64 delta) theta)
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) 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 (*.f64 (sin.f64 delta) (fma.f64 #s(literal 1/120 binary64) (*.f64 theta theta) #s(literal -1/6 binary64))) 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 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (sin.f64 delta) (*.f64 (*.f64 (*.f64 theta theta) (*.f64 theta theta)) (*.f64 (sin.f64 delta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))))) theta)
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* delta (sin theta))
(*.f64 (sin.f64 theta) delta)
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) 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 (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) 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 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 theta) (*.f64 (*.f64 (*.f64 delta delta) (*.f64 delta delta)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))))) delta)
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (cos.f64 delta))
(+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))
(+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))
(* -1 (* (pow phi1 2) (cos delta)))
(*.f64 (neg.f64 phi1) (*.f64 phi1 (cos.f64 delta)))
(* (pow phi1 2) (+ (* -1 (cos delta)) (* -1 (/ (* (cos theta) (sin delta)) phi1))))
(*.f64 (*.f64 (neg.f64 phi1) phi1) (fma.f64 (sin.f64 delta) (/.f64 (cos.f64 theta) phi1) (cos.f64 delta)))
(* (pow phi1 2) (+ (* -1 (cos delta)) (+ (* -1 (/ (* (cos theta) (sin delta)) phi1)) (/ (cos delta) (pow phi1 2)))))
(*.f64 (-.f64 (/.f64 (cos.f64 delta) (*.f64 phi1 phi1)) (fma.f64 (sin.f64 delta) (/.f64 (cos.f64 theta) phi1) (cos.f64 delta))) (*.f64 phi1 phi1))
(* (pow phi1 2) (+ (* -1 (cos delta)) (+ (* -1 (/ (* (cos theta) (sin delta)) phi1)) (/ (cos delta) (pow phi1 2)))))
(*.f64 (-.f64 (/.f64 (cos.f64 delta) (*.f64 phi1 phi1)) (fma.f64 (sin.f64 delta) (/.f64 (cos.f64 theta) phi1) (cos.f64 delta))) (*.f64 phi1 phi1))
(* -1 (* (pow phi1 2) (cos delta)))
(*.f64 (neg.f64 phi1) (*.f64 phi1 (cos.f64 delta)))
(* (pow phi1 2) (+ (* -1 (cos delta)) (* -1 (/ (* (cos theta) (sin delta)) phi1))))
(*.f64 (*.f64 (neg.f64 phi1) phi1) (fma.f64 (sin.f64 delta) (/.f64 (cos.f64 theta) phi1) (cos.f64 delta)))
(* (pow phi1 2) (+ (* -1 (cos delta)) (* -1 (/ (+ (* -1 (/ (cos delta) phi1)) (* (cos theta) (sin delta))) phi1))))
(*.f64 (-.f64 (/.f64 (fma.f64 (sin.f64 delta) (cos.f64 theta) (/.f64 (neg.f64 (cos.f64 delta)) phi1)) (neg.f64 phi1)) (cos.f64 delta)) (*.f64 phi1 phi1))
(* (pow phi1 2) (+ (* -1 (cos delta)) (* -1 (/ (+ (* -1 (/ (cos delta) phi1)) (* (cos theta) (sin delta))) phi1))))
(*.f64 (-.f64 (/.f64 (fma.f64 (sin.f64 delta) (cos.f64 theta) (/.f64 (neg.f64 (cos.f64 delta)) phi1)) (neg.f64 phi1)) (cos.f64 delta)) (*.f64 phi1 phi1))
(+ 1 (* -1 (pow phi1 2)))
(fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64))
(+ 1 (+ (* -1 (* delta (* phi1 (cos theta)))) (* -1 (pow phi1 2))))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (cos.f64 theta)) phi1 (*.f64 phi1 phi1)))
(+ 1 (+ (* -1 (pow phi1 2)) (* delta (+ (* -1 (* phi1 (cos theta))) (* -1/2 (* delta (+ 1 (* -1 (pow phi1 2)))))))))
(fma.f64 (fma.f64 (neg.f64 phi1) (cos.f64 theta) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) delta)) delta (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)))
(+ 1 (+ (* -1 (pow phi1 2)) (* delta (+ (* -1 (* phi1 (cos theta))) (* delta (+ (* -1/2 (+ 1 (* -1 (pow phi1 2)))) (* 1/6 (* delta (* phi1 (cos theta))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) phi1) (fma.f64 (*.f64 #s(literal 1/6 binary64) delta) delta #s(literal -1 binary64)))) delta (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))
(+ (* -1 (* phi1 (sin delta))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(fma.f64 (neg.f64 phi1) (sin.f64 delta) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))
(+ (* -1 (* phi1 (sin delta))) (+ (* 1/2 (* phi1 (* (pow theta 2) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2))))))
(fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 theta theta)) (sin.f64 delta) (fma.f64 (neg.f64 phi1) (sin.f64 delta) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta))))
(+ (* -1 (* phi1 (sin delta))) (+ (* (cos delta) (+ 1 (* -1 (pow phi1 2)))) (* (pow theta 2) (+ (* -1/24 (* phi1 (* (pow theta 2) (sin delta)))) (* 1/2 (* phi1 (sin delta)))))))
(fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) theta) theta) phi1) #s(literal -1/24 binary64) (*.f64 (*.f64 (sin.f64 delta) phi1) #s(literal 1/2 binary64))) theta) theta (fma.f64 (neg.f64 phi1) (sin.f64 delta) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta))))
(+ (* -1 (* phi1 (sin delta))) (+ (* (cos delta) (+ 1 (* -1 (pow phi1 2)))) (* (pow theta 2) (+ (* 1/2 (* phi1 (sin delta))) (* (pow theta 2) (+ (* -1/24 (* phi1 (sin delta))) (* 1/720 (* phi1 (* (pow theta 2) (sin delta))))))))))
(fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/24 binary64) (sin.f64 delta)) phi1 (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) theta) theta) phi1) #s(literal 1/720 binary64))) theta) theta (*.f64 (*.f64 (sin.f64 delta) phi1) #s(literal 1/2 binary64))) theta) theta (fma.f64 (neg.f64 phi1) (sin.f64 delta) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta))))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))
(+ (* -1 (* phi1 (* (cos theta) (sin delta)))) (* (cos delta) (+ 1 (* -1 (pow phi1 2)))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 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)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) 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 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 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)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 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)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(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 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
1
#s(literal 1 binary64)
(+ 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 (fma.f64 (*.f64 #s(literal 1/3 binary64) phi1) phi1 #s(literal -1 binary64)) phi1) phi1 #s(literal 1 binary64))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2/45 binary64) phi1) phi1 #s(literal 1/3 binary64)) phi1) phi1 #s(literal -1 binary64)) phi1) phi1 #s(literal 1 binary64))
(- 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/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/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/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/2 (cos (neg (* -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/2 (cos (neg (* -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/2 (cos (neg (* -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/2 (cos (neg (* -2 phi1)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(* -1 (pow phi1 2))
(*.f64 (neg.f64 phi1) phi1)
(* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) phi1) phi1 #s(literal -1 binary64)) phi1) phi1)
(* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))
(*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2/45 binary64) phi1) phi1 #s(literal 1/3 binary64)) phi1) phi1 #s(literal -1 binary64)) phi1) phi1)
(* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* (pow phi1 2) (- (* 1/315 (pow phi1 2)) 2/45)))) 1))
(*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/315 binary64) phi1) phi1 #s(literal -2/45 binary64)) phi1) phi1 #s(literal 1/3 binary64)) phi1) phi1 #s(literal -1 binary64)) phi1) phi1)
(* -1 (+ 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 (+ 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 (+ 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 (+ 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 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))
(* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))
(* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))
(* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1) lambda1 lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* (pow phi1 2) (cos delta))))
(*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta))
(+ (cos delta) (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta))))
(fma.f64 (*.f64 (*.f64 (cos.f64 delta) (fma.f64 (*.f64 #s(literal 1/3 binary64) phi1) phi1 #s(literal -1 binary64))) phi1) phi1 (cos.f64 delta))
(+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta))))
(fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 delta) (fma.f64 (*.f64 #s(literal -2/45 binary64) phi1) phi1 #s(literal 1/3 binary64))) phi1) phi1 (neg.f64 (cos.f64 delta))) phi1) phi1 (cos.f64 delta))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta) (cos.f64 delta))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta) (cos.f64 delta))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta) (cos.f64 delta))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta) (cos.f64 delta))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta) (cos.f64 delta))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta) (cos.f64 delta))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta) (cos.f64 delta))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta) (cos.f64 delta))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* -1 (* (pow delta 2) (+ 1/2 (* -1/2 (pow (sin phi1) 2)))))) (pow (sin phi1) 2))
(fma.f64 (*.f64 (-.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) delta) delta (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (+ 1 (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (pow (sin phi1) 2)))) (+ 1/2 (* -1/2 (pow (sin phi1) 2)))))) (pow (sin phi1) 2))
(fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/24 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/24 binary64)) delta) delta (-.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)))) delta) delta (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (+ 1 (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (pow (sin phi1) 2)))))) (* 1/24 (pow (sin phi1) 2)))) (+ 1/2 (* -1/2 (pow (sin phi1) 2)))))) (pow (sin phi1) 2))
(fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/24 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (fma.f64 (*.f64 (neg.f64 delta) delta) (fma.f64 #s(literal -1/720 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/720 binary64)) #s(literal 1/24 binary64))) delta) delta (-.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)))) delta) delta (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta) (cos.f64 delta))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta) (cos.f64 delta))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta) (cos.f64 delta))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta) (cos.f64 delta))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta) (cos.f64 delta))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta) (cos.f64 delta))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta) (cos.f64 delta))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta) (cos.f64 delta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (cos.f64 delta))
(+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))
(+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos 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) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (+ 1 (* delta (+ (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* -1 (* (cos phi1) (* (cos theta) (sin phi1))))))) (pow (sin phi1) 2))
(fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1) (*.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta))) delta (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (+ 1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2)))))))) (pow (sin phi1) 2))
(fma.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1) (*.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) delta)) delta (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- (+ (cos delta) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta) (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 theta theta) #s(literal -1 binary64)) (cos.f64 delta)))
(- (+ (cos delta) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (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)))
(fma.f64 (*.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))) theta) theta (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(- (+ (cos delta) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (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) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta) (+.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 theta theta) #s(literal -1 binary64)) (*.f64 (*.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)))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) lambda1 lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/3 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) phi1)
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal 2/45 binary64) phi1) phi1 #s(literal -1/3 binary64)) phi1) phi1 #s(literal 1 binary64)) phi1) phi1)
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/315 binary64) phi1) phi1 #s(literal 2/45 binary64)) phi1) phi1 #s(literal -1/3 binary64)) phi1) phi1 #s(literal 1 binary64)) phi1) phi1)
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(* -1 (* phi1 (cos theta)))
(*.f64 (neg.f64 phi1) (cos.f64 theta))
(* phi1 (+ (* -1 (cos theta)) (* -1 (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))))))
(*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)) phi1) phi1 (cos.f64 theta))) phi1)
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))) (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))))
(*.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 theta) #s(literal 2/15 binary64)) phi1) phi1 (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)))) phi1) phi1 (neg.f64 (cos.f64 theta))) phi1)
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta))))))) (* -1 (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))))))))
(*.f64 (fma.f64 (fma.f64 (neg.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/144 binary64) (cos.f64 theta) (*.f64 (cos.f64 theta) #s(literal -29/5040 binary64))) phi1) phi1 (*.f64 (cos.f64 theta) #s(literal 2/15 binary64)))) (*.f64 phi1 phi1) (*.f64 (cos.f64 theta) #s(literal 2/3 binary64))) (*.f64 phi1 phi1) (neg.f64 (cos.f64 theta))) phi1)
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1))
(* -1 (* (cos phi1) (sin phi1)))
(*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1))
(+ (* -1 (* (cos phi1) (sin phi1))) (* 1/2 (* (pow theta 2) (* (cos phi1) (sin phi1)))))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 theta theta) #s(literal -1 binary64)))
(+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/2 (* (cos phi1) (sin phi1))))))
(fma.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1) (*.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)))
(+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (sin phi1))) (* 1/720 (* (pow theta 2) (* (cos phi1) (sin phi1)))))))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 theta theta) #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 theta theta) (*.f64 theta theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64)))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1) (pow.f64 (sin.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 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1) (*.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta))) delta (-.f64 #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))
(fma.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1) (*.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) delta)) delta (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (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 (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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.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)))))
(fma.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta) (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 theta theta) #s(literal -1 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 (*.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))) theta) theta (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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)))))
(fma.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta) (+.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 theta theta) #s(literal -1 binary64)) (*.f64 (*.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)))
(- (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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1) (pow.f64 (sin.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 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1) (*.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta))) delta (-.f64 #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))
(fma.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1) (*.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) delta)) delta (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (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 (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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.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)))))
(fma.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta) (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 theta theta) #s(literal -1 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 (*.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))) theta) theta (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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)))))
(fma.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta) (+.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 theta theta) #s(literal -1 binary64)) (*.f64 (*.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)))
(- (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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* -1 (* delta (* phi1 (cos theta))))
(*.f64 (*.f64 (neg.f64 delta) phi1) (cos.f64 theta))
(* delta (+ (* -1 (* phi1 (cos theta))) (* 1/6 (* (pow delta 2) (* phi1 (cos theta))))))
(*.f64 (*.f64 (*.f64 (cos.f64 theta) phi1) (fma.f64 (*.f64 #s(literal 1/6 binary64) delta) delta #s(literal -1 binary64))) delta)
(* delta (+ (* -1 (* phi1 (cos theta))) (* (pow delta 2) (+ (* -1/120 (* (pow delta 2) (* phi1 (cos theta)))) (* 1/6 (* phi1 (cos theta)))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) phi1) (fma.f64 #s(literal -1/120 binary64) (*.f64 delta delta) #s(literal 1/6 binary64))) delta) delta (*.f64 (neg.f64 phi1) (cos.f64 theta))) delta)
(* delta (+ (* -1 (* phi1 (cos theta))) (* (pow delta 2) (+ (* 1/6 (* phi1 (cos theta))) (* (pow delta 2) (+ (* -1/120 (* phi1 (cos theta))) (* 1/5040 (* (pow delta 2) (* phi1 (cos theta))))))))))
(*.f64 (fma.f64 (*.f64 (cos.f64 theta) phi1) (fma.f64 (*.f64 #s(literal 1/6 binary64) delta) delta #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 delta delta) (*.f64 delta delta)) (*.f64 (*.f64 (cos.f64 theta) phi1) (fma.f64 #s(literal 1/5040 binary64) (*.f64 delta delta) #s(literal -1/120 binary64))))) delta)
(* -1 (* phi1 (* (cos theta) (sin delta))))
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* -1 (* phi1 (sin delta)))
(*.f64 (neg.f64 phi1) (sin.f64 delta))
(+ (* -1 (* phi1 (sin delta))) (* 1/2 (* phi1 (* (pow theta 2) (sin delta)))))
(fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 theta theta)) (sin.f64 delta) (*.f64 (neg.f64 phi1) (sin.f64 delta)))
(+ (* -1 (* phi1 (sin delta))) (* (pow theta 2) (+ (* -1/24 (* phi1 (* (pow theta 2) (sin delta)))) (* 1/2 (* phi1 (sin delta))))))
(fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) theta) theta) phi1) #s(literal -1/24 binary64) (*.f64 (*.f64 (sin.f64 delta) phi1) #s(literal 1/2 binary64))) theta) theta (*.f64 (neg.f64 phi1) (sin.f64 delta)))
(+ (* -1 (* phi1 (sin delta))) (* (pow theta 2) (+ (* 1/2 (* phi1 (sin delta))) (* (pow theta 2) (+ (* -1/24 (* phi1 (sin delta))) (* 1/720 (* phi1 (* (pow theta 2) (sin delta)))))))))
(fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/24 binary64) (sin.f64 delta)) phi1 (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) theta) theta) phi1) #s(literal 1/720 binary64))) theta) theta (*.f64 (*.f64 (sin.f64 delta) phi1) #s(literal 1/2 binary64))) theta) theta (*.f64 (neg.f64 phi1) (sin.f64 delta)))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/3 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) phi1)
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal 2/45 binary64) phi1) phi1 #s(literal -1/3 binary64)) phi1) phi1 #s(literal 1 binary64)) phi1) phi1)
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/315 binary64) phi1) phi1 #s(literal 2/45 binary64)) phi1) phi1 #s(literal -1/3 binary64)) phi1) phi1 #s(literal 1 binary64)) phi1) 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/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/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/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/2 (cos (neg (* -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/2 (cos (neg (* -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/2 (cos (neg (* -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/2 (cos (neg (* -2 phi1)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(* -1 (* phi1 (sin delta)))
(*.f64 (neg.f64 phi1) (sin.f64 delta))
(* phi1 (+ (* -1 (sin delta)) (* -1 (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* -1/6 (sin delta)))))))
(*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 delta) #s(literal -2/3 binary64)) phi1) phi1 (sin.f64 delta))) phi1)
(* phi1 (+ (* -1 (sin delta)) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (sin delta)) (+ (* 1/24 (sin delta)) (* 1/12 (sin delta)))))) (* -1 (+ (* -1/2 (sin delta)) (* -1/6 (sin delta))))))))
(*.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 delta) #s(literal 2/15 binary64)) phi1) phi1 (*.f64 (sin.f64 delta) #s(literal -2/3 binary64)))) phi1) phi1 (neg.f64 (sin.f64 delta))) phi1)
(* phi1 (+ (* -1 (sin delta)) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (sin delta)) (* -1/6 (sin delta)))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* -1/144 (sin delta)) (+ (* -1/240 (sin delta)) (+ (* -1/720 (sin delta)) (* -1/5040 (sin delta))))))) (* -1 (+ (* 1/120 (sin delta)) (+ (* 1/24 (sin delta)) (* 1/12 (sin delta)))))))))))
(*.f64 (fma.f64 (fma.f64 (neg.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/144 binary64) (sin.f64 delta) (*.f64 (sin.f64 delta) #s(literal -29/5040 binary64))) phi1) phi1 (*.f64 (sin.f64 delta) #s(literal 2/15 binary64)))) (*.f64 phi1 phi1) (*.f64 (sin.f64 delta) #s(literal 2/3 binary64))) (*.f64 phi1 phi1) (neg.f64 (sin.f64 delta))) phi1)
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* delta (* (cos phi1) (sin phi1))))
(*.f64 (*.f64 (neg.f64 delta) (cos.f64 phi1)) (sin.f64 phi1))
(* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* 1/6 (* (pow delta 2) (* (cos phi1) (sin phi1))))))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 (*.f64 #s(literal 1/6 binary64) delta) delta #s(literal -1 binary64))) delta)
(* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow delta 2) (+ (* -1/120 (* (pow delta 2) (* (cos phi1) (sin phi1)))) (* 1/6 (* (cos phi1) (sin phi1)))))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 #s(literal -1/120 binary64) (*.f64 delta delta) #s(literal 1/6 binary64))) (*.f64 delta delta))) delta)
(* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow delta 2) (+ (* 1/6 (* (cos phi1) (sin phi1))) (* (pow delta 2) (+ (* -1/120 (* (cos phi1) (sin phi1))) (* 1/5040 (* (pow delta 2) (* (cos phi1) (sin phi1))))))))))
(*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 (*.f64 #s(literal 1/6 binary64) delta) delta #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 delta delta) (*.f64 delta delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 #s(literal 1/5040 binary64) (*.f64 delta delta) #s(literal -1/120 binary64))))) delta)
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))

rewrite497.0ms (2.8%)

Memory
2.7MiB live, 349.9MiB allocated
Rules
2 589×lower-fma.f32
2 582×lower-fma.f64
2 476×lower-*.f32
2 466×lower-*.f64
1 782×lower-/.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
073619
0124604
1446588
23409588
09353575
Stop Event
iter limit
node limit
iter limit
Counts
26 → 558
Calls
Call 1
Inputs
(fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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))
(fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (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))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))
(+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta))))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 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))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
Outputs
(*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (neg.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))))
(*.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (-.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (pow.f64 (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) #s(literal 2 binary64)))))
(pow.f64 (/.f64 (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (neg.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (-.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (pow.f64 (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) #s(literal 2 binary64))) (+.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (neg.f64 (-.f64 (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (cos.f64 delta))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (neg.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (-.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (pow.f64 (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (neg.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (*.f64 (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (neg.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)))) (*.f64 (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (neg.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (neg.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) #s(literal 2 binary64))) (-.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (cos.f64 delta)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (neg.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) #s(literal 2 binary64)) (*.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (*.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (-.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (pow.f64 (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64))) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (neg.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (neg.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (-.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (pow.f64 (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) #s(literal 2 binary64))) (+.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) #s(literal 3 binary64))))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) #s(literal 2 binary64)) (*.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (*.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (-.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (pow.f64 (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (neg.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (-.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (pow.f64 (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) #s(literal 2 binary64))) (+.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) #s(literal 3 binary64)))))
(fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (neg.f64 (sin.f64 phi1)))) (cos.f64 phi1) (+.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(fma.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) (cos.f64 phi1) (+.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta)) (+.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(fma.f64 (*.f64 (sin.f64 delta) (neg.f64 (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (+.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(fma.f64 (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (+.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(fma.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (+.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))
(fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta) (+.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (+.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(fma.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (+.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (+.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (sin.f64 delta) (+.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (neg.f64 (sin.f64 phi1))) (+.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(fma.f64 (cos.f64 theta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (sin.f64 delta)) (+.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (+.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (cos.f64 delta) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (neg.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (/.f64 (pow.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (neg.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))))
(+.f64 (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))
(+.f64 (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (cos.f64 delta))
(+.f64 (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(+.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (+.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(+.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))
(+.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))))
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) lambda1) (*.f64 lambda1 lambda1))))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) lambda1)))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) lambda1)))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) lambda1))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #s(literal 3 binary64)))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (cos.f64 delta) #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (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 delta) (cos.f64 phi1)) (sin.f64 theta))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(*.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 (sin.f64 theta) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 delta 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 (sin.f64 theta) (+.f64 (sin.f64 (+.f64 delta phi1)) (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 (*.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 #s(literal 1 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 (fma.f64 (*.f64 lambda1 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 3 binary64))) (/.f64 #s(literal 1 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))))
(pow.f64 (/.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 (*.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)))) #s(literal -1 binary64))
(pow.f64 (/.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)) (fma.f64 (*.f64 lambda1 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 3 binary64)))) #s(literal -1 binary64))
(/.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 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.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 (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 (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 (neg.f64 (fma.f64 (*.f64 lambda1 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 3 binary64))))) (neg.f64 (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 (*.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 (-.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)))) (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 (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 (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 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 (fma.f64 (*.f64 lambda1 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 3 binary64)))) (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 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 (neg.f64 (fma.f64 (*.f64 lambda1 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 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 #s(literal -1 binary64) (neg.f64 (/.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 (*.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 #s(literal -1 binary64) (neg.f64 (/.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)) (fma.f64 (*.f64 lambda1 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 3 binary64))))))
(/.f64 (fma.f64 (*.f64 lambda1 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 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 (fma.f64 (*.f64 lambda1 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 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 #s(literal 1 binary64) (/.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 (*.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 #s(literal 1 binary64) (/.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)) (fma.f64 (*.f64 lambda1 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 3 binary64)))))
(-.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 (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 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta)))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 theta delta)))) #s(literal 4 binary64))
(/.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 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))))))
(/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))))
(-.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)))
(*.f64 (fma.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (neg.f64 (pow.f64 (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)))))
(*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)) (-.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))))))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))) (fma.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (neg.f64 (pow.f64 (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)) #s(literal 2 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)) (-.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta))))) (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (neg.f64 (-.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (neg.f64 (pow.f64 (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)) #s(literal 2 binary64)))))) (neg.f64 (neg.f64 (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)) (-.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)))) (*.f64 (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)) #s(literal 2 binary64)))) (*.f64 (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)))))
(/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1) #s(literal -1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal -1 binary64)) (*.f64 phi1 (+.f64 (sin.f64 (+.f64 theta delta)) (sin.f64 (-.f64 delta theta)))))) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal -1 binary64)) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 phi1 phi1) (neg.f64 phi1)) (*.f64 (*.f64 phi1 phi1) phi1) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 (fma.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 phi1) phi1))) (*.f64 phi1 (+.f64 (sin.f64 (+.f64 theta delta)) (sin.f64 (-.f64 delta theta)))))) (*.f64 (fma.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 phi1) phi1))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 delta) (fma.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1) #s(literal -1 binary64))) #s(literal 2 binary64)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal -1 binary64)) (*.f64 phi1 (+.f64 (sin.f64 (+.f64 theta delta)) (sin.f64 (-.f64 delta theta)))))) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal -1 binary64)) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 delta) (fma.f64 (*.f64 (*.f64 phi1 phi1) (neg.f64 phi1)) (*.f64 (*.f64 phi1 phi1) phi1) #s(literal 1 binary64))) #s(literal 2 binary64)) (*.f64 (fma.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 phi1) phi1))) (*.f64 phi1 (+.f64 (sin.f64 (+.f64 theta delta)) (sin.f64 (-.f64 delta theta)))))) (*.f64 (fma.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 phi1) phi1))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1) #s(literal -1 binary64)) (cos.f64 delta)) #s(literal 2 binary64) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal -1 binary64)) (*.f64 (+.f64 (sin.f64 (+.f64 theta delta)) (sin.f64 (-.f64 delta theta))) (neg.f64 phi1)))) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal -1 binary64)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1) #s(literal -1 binary64)) (cos.f64 delta)) #s(literal 2 binary64) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal -1 binary64)) (*.f64 (neg.f64 phi1) (+.f64 (sin.f64 (+.f64 theta delta)) (sin.f64 (-.f64 delta theta)))))) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal -1 binary64)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 phi1 phi1) (neg.f64 phi1)) (*.f64 (*.f64 phi1 phi1) phi1) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64) (*.f64 (fma.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 phi1) phi1))) (*.f64 (+.f64 (sin.f64 (+.f64 theta delta)) (sin.f64 (-.f64 delta theta))) (neg.f64 phi1)))) (*.f64 (fma.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 phi1) phi1))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 phi1 phi1) (neg.f64 phi1)) (*.f64 (*.f64 phi1 phi1) phi1) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64) (*.f64 (fma.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 phi1) phi1))) (*.f64 (neg.f64 phi1) (+.f64 (sin.f64 (+.f64 theta delta)) (sin.f64 (-.f64 delta theta)))))) (*.f64 (fma.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 phi1) phi1))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (cos.f64 delta) (fma.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1) #s(literal -1 binary64))) #s(literal 2 binary64) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal -1 binary64)) (*.f64 (+.f64 (sin.f64 (+.f64 theta delta)) (sin.f64 (-.f64 delta theta))) (neg.f64 phi1)))) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal -1 binary64)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (cos.f64 delta) (fma.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1) #s(literal -1 binary64))) #s(literal 2 binary64) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal -1 binary64)) (*.f64 (neg.f64 phi1) (+.f64 (sin.f64 (+.f64 theta delta)) (sin.f64 (-.f64 delta theta)))))) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal -1 binary64)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (cos.f64 delta) (fma.f64 (*.f64 (*.f64 phi1 phi1) (neg.f64 phi1)) (*.f64 (*.f64 phi1 phi1) phi1) #s(literal 1 binary64))) #s(literal 2 binary64) (*.f64 (fma.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 phi1) phi1))) (*.f64 (+.f64 (sin.f64 (+.f64 theta delta)) (sin.f64 (-.f64 delta theta))) (neg.f64 phi1)))) (*.f64 (fma.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 phi1) phi1))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (cos.f64 delta) (fma.f64 (*.f64 (*.f64 phi1 phi1) (neg.f64 phi1)) (*.f64 (*.f64 phi1 phi1) phi1) #s(literal 1 binary64))) #s(literal 2 binary64) (*.f64 (fma.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 phi1) phi1))) (*.f64 (neg.f64 phi1) (+.f64 (sin.f64 (+.f64 theta delta)) (sin.f64 (-.f64 delta theta)))))) (*.f64 (fma.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 phi1) phi1))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (+.f64 (sin.f64 (+.f64 theta delta)) (sin.f64 (-.f64 delta theta))) (neg.f64 phi1)) (fma.f64 (neg.f64 phi1) phi1 #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1) #s(literal -1 binary64)) (cos.f64 delta)))) (*.f64 #s(literal 2 binary64) (fma.f64 (neg.f64 phi1) phi1 #s(literal -1 binary64))))
(/.f64 (fma.f64 (*.f64 (+.f64 (sin.f64 (+.f64 theta delta)) (sin.f64 (-.f64 delta theta))) (neg.f64 phi1)) (fma.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 phi1) phi1))) (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 (*.f64 (*.f64 phi1 phi1) (neg.f64 phi1)) (*.f64 (*.f64 phi1 phi1) phi1) #s(literal 1 binary64)) (cos.f64 delta)))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 phi1) phi1)))))
(/.f64 (fma.f64 (*.f64 (+.f64 (sin.f64 (+.f64 theta delta)) (sin.f64 (-.f64 delta theta))) (neg.f64 phi1)) (fma.f64 (neg.f64 phi1) phi1 #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 delta) (fma.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1) #s(literal -1 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 (neg.f64 phi1) phi1 #s(literal -1 binary64))))
(/.f64 (fma.f64 (*.f64 (+.f64 (sin.f64 (+.f64 theta delta)) (sin.f64 (-.f64 delta theta))) (neg.f64 phi1)) (fma.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 phi1) phi1))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 delta) (fma.f64 (*.f64 (*.f64 phi1 phi1) (neg.f64 phi1)) (*.f64 (*.f64 phi1 phi1) phi1) #s(literal 1 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 phi1) phi1)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 phi1) (+.f64 (sin.f64 (+.f64 theta delta)) (sin.f64 (-.f64 delta theta)))) (fma.f64 (neg.f64 phi1) phi1 #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1) #s(literal -1 binary64)) (cos.f64 delta)))) (*.f64 #s(literal 2 binary64) (fma.f64 (neg.f64 phi1) phi1 #s(literal -1 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 phi1) (+.f64 (sin.f64 (+.f64 theta delta)) (sin.f64 (-.f64 delta theta)))) (fma.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 phi1) phi1))) (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 (*.f64 (*.f64 phi1 phi1) (neg.f64 phi1)) (*.f64 (*.f64 phi1 phi1) phi1) #s(literal 1 binary64)) (cos.f64 delta)))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 phi1) phi1)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 phi1) (+.f64 (sin.f64 (+.f64 theta delta)) (sin.f64 (-.f64 delta theta)))) (fma.f64 (neg.f64 phi1) phi1 #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 delta) (fma.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1) #s(literal -1 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 (neg.f64 phi1) phi1 #s(literal -1 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 phi1) (+.f64 (sin.f64 (+.f64 theta delta)) (sin.f64 (-.f64 delta theta)))) (fma.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 phi1) phi1))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 delta) (fma.f64 (*.f64 (*.f64 phi1 phi1) (neg.f64 phi1)) (*.f64 (*.f64 phi1 phi1) phi1) #s(literal 1 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 phi1) phi1)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (-.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta))))
(/.f64 (neg.f64 (fma.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (neg.f64 (pow.f64 (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)) #s(literal 2 binary64))))) (neg.f64 (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (*.f64 (*.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)) (neg.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)) (-.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))))))
(/.f64 (fma.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (neg.f64 (pow.f64 (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)) #s(literal 2 binary64)))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))) (fma.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (neg.f64 (pow.f64 (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)) #s(literal 2 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)) (-.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta))))) (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (*.f64 (*.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)) (neg.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)) (-.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))) (fma.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (neg.f64 (pow.f64 (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)) (-.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta))))) (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) #s(literal -1 binary64)) phi1 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)))
(fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (neg.f64 phi1)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (*.f64 (neg.f64 phi1) (sin.f64 delta)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 delta) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)))
(fma.f64 phi1 (neg.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))
(-.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)))) (/.f64 (pow.f64 (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)))))
(-.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)))
(+.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)))
(+.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)) (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))))))
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) lambda1) (*.f64 lambda1 lambda1))))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) lambda1)))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)))))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)))))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) lambda1)))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) lambda1))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) #s(literal 3 binary64)))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)))))
(*.f64 (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))))
(*.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 2 binary64)))))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)))) (neg.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64)))) (neg.f64 (neg.f64 (+.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64))) (neg.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64))) (neg.f64 (+.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64)))))
(/.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64))))
(fma.f64 (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(-.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))))
(-.f64 #s(literal 0 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal -1/2 binary64))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(*.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(*.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(/.f64 (neg.f64 (*.f64 #s(literal -1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (*.f64 #s(literal -1 binary64) (fma.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64)))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 2 binary64)))) (neg.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal -1/8 binary64))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64)))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (*.f64 #s(literal -1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)))
(/.f64 (*.f64 #s(literal -1 binary64) (fma.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal -1/8 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (neg.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64))) (neg.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64)))
(/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64)) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(neg.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64) #s(literal -1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal -1/2 binary64))
(fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal -1 binary64) #s(literal -1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64))
(-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(-.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(+.f64 (*.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal -1 binary64)) #s(literal -1/2 binary64))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64))
(+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(+.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))))
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1))))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64)))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))
(*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta))
(*.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))))
(*.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(pow.f64 (/.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (neg.f64 (-.f64 (cos.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (*.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (pow.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (-.f64 (cos.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 3 binary64))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 3 binary64)))))
(fma.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (cos.f64 delta))
(fma.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal -1 binary64) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (cos.f64 delta) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (cos.f64 delta))
(fma.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (cos.f64 delta) (cos.f64 delta))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (neg.f64 (cos.f64 delta)) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (neg.f64 (cos.f64 delta))) (cos.f64 delta))
(-.f64 (+.f64 (cos.f64 delta) #s(literal 0 binary64)) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(-.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))))
(-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (cos.f64 delta)))
(-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(+.f64 (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
(*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)))))
(*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))))
(pow.f64 (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (neg.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.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 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)))) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta))) (pow.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) (*.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)))) (*.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.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 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) #s(literal 1 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) #s(literal 1 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 3 binary64))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 3 binary64))) (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 3 binary64))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)))))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 3 binary64))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64))))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64))))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 3 binary64))) (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) #s(literal 1 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 3 binary64))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) #s(literal 1 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 3 binary64))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (*.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (*.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 3 binary64))))) (*.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 3 binary64))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 3 binary64))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 3 binary64))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (*.f64 (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (*.f64 (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 3 binary64))))) (*.f64 (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 3 binary64))))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)))) (+.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (-.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1))))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.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 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)))))
(fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (neg.f64 (sin.f64 phi1)))) (cos.f64 phi1) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) (cos.f64 phi1) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))
(fma.f64 (neg.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (*.f64 (sin.f64 delta) (neg.f64 (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (cos.f64 delta))) (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(fma.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))
(fma.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal -1 binary64) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (sin.f64 delta) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (neg.f64 (sin.f64 phi1))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 delta) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (cos.f64 delta) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (neg.f64 (cos.f64 delta))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (cos.f64 delta))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)))) (/.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.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 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))
(+.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))
(+.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)))
(+.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))
(+.f64 (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(+.f64 (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(+.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))))
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1))))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 3 binary64)))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.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 #s(literal 2 binary64)) (log.f64 (sin.f64 phi1)))
(pow.f64 (neg.f64 (sin.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 1 binary64))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal -2 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(exp.f64 (+.f64 (log.f64 (sin.f64 phi1)) (log.f64 (sin.f64 phi1))))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 phi1)) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 phi1)) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal -1 binary64)) (sin.f64 phi1))
(*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (cos.f64 theta))
(*.f64 (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))
(*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))))
(*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))))
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
(*.f64 (sin.f64 phi1) (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 theta phi1))) (neg.f64 (sin.f64 phi1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 theta phi1))))) #s(literal -2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 theta phi1))) (neg.f64 (sin.f64 phi1))) #s(literal 2 binary64))
(/.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 theta phi1)))) #s(literal 2 binary64))
(neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))))
(*.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) #s(literal -1 binary64)) phi1)
(*.f64 (*.f64 (neg.f64 phi1) (cos.f64 theta)) (sin.f64 delta))
(*.f64 (*.f64 (neg.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.f64 #s(literal -1 binary64) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1))
(*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (neg.f64 phi1)))
(*.f64 (cos.f64 theta) (*.f64 (neg.f64 phi1) (sin.f64 delta)))
(*.f64 phi1 (neg.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))))
(/.f64 (neg.f64 (*.f64 (+.f64 (sin.f64 (+.f64 theta delta)) (sin.f64 (-.f64 delta theta))) (neg.f64 phi1))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (neg.f64 phi1) (+.f64 (sin.f64 (+.f64 theta delta)) (sin.f64 (-.f64 delta theta))))) #s(literal -2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 theta delta)) (sin.f64 (-.f64 delta theta))) (neg.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (neg.f64 phi1) (+.f64 (sin.f64 (+.f64 theta delta)) (sin.f64 (-.f64 delta theta)))) #s(literal 2 binary64))
(neg.f64 (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)))
(*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64))))
(*.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(pow.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (fma.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)))) (neg.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64)))) (neg.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (fma.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64)))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (fma.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64))))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64))))
(+.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) #s(literal -1 binary64)) (sin.f64 phi1))
(*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (sin.f64 delta))
(*.f64 (*.f64 (sin.f64 delta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))
(*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 phi1)))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (neg.f64 (sin.f64 phi1)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (neg.f64 (sin.f64 phi1))))
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(*.f64 (sin.f64 phi1) (neg.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1))))
(/.f64 (neg.f64 (*.f64 (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 delta phi1))) (neg.f64 (sin.f64 phi1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 delta phi1))))) #s(literal -2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 delta phi1))) (neg.f64 (sin.f64 phi1))) #s(literal 2 binary64))
(/.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 delta phi1)))) #s(literal 2 binary64))
(neg.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 phi1)))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 phi1)))

eval352.0ms (2%)

Memory
7.3MiB live, 363.2MiB allocated
Compiler

Compiled 75 588 to 3 806 computations (95% saved)

prune433.0ms (2.4%)

Memory
-20.8MiB live, 471.1MiB allocated
Pruning

58 alts after pruning (55 fresh and 3 done)

PrunedKeptTotal
New1 730291 759
Fresh152641
Picked325
Done011
Total1 748581 806
Accuracy
100.0%
Counts
1 806 → 58
Alt Table
Click to see full alt table
StatusAccuracyProgram
38.4%
(/.f64 (-.f64 (pow.f64 (pow.f64 (sqrt.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.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) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1))
70.3%
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)))) lambda1))
70.3%
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)))))) lambda1))
48.1%
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1)) (*.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))))
57.6%
(/.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))
99.7%
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
88.0%
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
84.0%
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (sin.f64 theta) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 delta phi1)))) #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))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (sin.f64 delta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))))
91.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.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)))) (/.f64 #s(literal 1 binary64) (fma.f64 (-.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 delta delta)))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))))) (cos.f64 delta))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal -1/2 binary64)) (cos.f64 delta)))))
78.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (pow (sin phi1) 2) (cos delta))) (cos delta)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))
88.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (pow (sin phi1) 2) (cos delta))) (cos delta)) (cos.f64 delta)))))
78.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (sin.f64 phi1) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))))
56.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (-.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)))) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta))) (pow.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)))))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
91.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)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
80.4%
(+.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 (sin.f64 phi1) (fma.f64 (fma.f64 (*.f64 theta theta) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
83.7%
(+.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 (sin.f64 phi1) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
93.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))))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))))
63.0%
(+.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 (fma.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (neg.f64 (pow.f64 (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)) #s(literal 2 binary64)))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)))))))
77.6%
(+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
77.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))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) delta (cos.f64 phi1))))))
87.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))))))) (cos.f64 delta))))
68.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))))))) #s(approx (+ (* (+ (* (neg phi1) phi1) 1) (cos delta)) (* (neg phi1) (* (sin delta) (cos theta)))) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64))))))
52.3%
(+.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 phi1) phi1) 1) (cos delta)) (* (neg phi1) (* (sin delta) (cos theta)))) (*.f64 (neg.f64 phi1) (*.f64 phi1 (cos.f64 delta)))))))
72.1%
(+.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))))))) (cos.f64 delta))))
74.0%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
73.2%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) 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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
74.4%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) 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))))
68.3%
(+.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 1/2 binary64))) #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 (fma.f64 (*.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (cos.f64 phi1))) delta)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
71.3%
(+.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)) #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)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))))
74.0%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
71.1%
(+.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))))))) (cos.f64 delta))))
87.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
86.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.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 (sin.f64 delta) (cos.f64 theta)))))))))
75.8%
(+.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))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
87.5%
(+.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))))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))))
83.9%
(+.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))))))) (fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (cos.f64 delta)))))
73.8%
(+.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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
86.4%
(+.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))))
68.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) 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))))
71.2%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) 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))))
71.3%
(+.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))))
70.1%
(+.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))))
43.2%
(*.f64 (fma.f64 (*.f64 lambda1 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 3 binary64))) (/.f64 #s(literal 1 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))))
57.4%
(*.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 #s(literal 1 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))))))
35.1%
#s(approx (/ (- (pow (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (+ (* (* (cos phi1) (cos theta)) (sin delta)) (* (cos delta) (sin phi1))) (sin phi1)))) 2) (* lambda1 lambda1)) (- (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (+ (* (* (cos phi1) (cos theta)) (sin delta)) (* (cos delta) (sin phi1))) (sin phi1)))) lambda1)) (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
35.2%
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (* (sin delta) (cos phi1))) (cos theta)) (* (+ (neg (+ (* -1/2 (cos (+ phi1 phi1))) 1/2)) 1) (cos delta))))) (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))
Compiler

Compiled 5 077 to 2 587 computations (49% saved)

simplify314.0ms (1.8%)

Memory
53.6MiB live, 277.4MiB allocated
Algorithm
egg-herbie
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)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (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 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))
cost-diff6592
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (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)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
cost-diff128
(*.f64 #s(literal 2 binary64) 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))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
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
(*.f64 (sin.f64 delta) (cos.f64 phi1))
cost-diff0
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta))
cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))
cost-diff0
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
Rules
9 556×lower-fma.f32
9 549×lower-fma.f64
1 772×lower-*.f32
1 762×lower-*.f64
1 179×lower-+.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
076842
0125829
1215821
2377809
31014809
42153809
53131809
64348809
75293809
85987809
96381809
106762809
116918809
127933809
137994809
08022803
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(sin.f64 theta)
theta
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(cos.f64 (+.f64 phi1 phi1))
(+.f64 phi1 phi1)
(cos.f64 delta)
(*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))
(*.f64 (cos.f64 phi1) (cos.f64 theta))
(cos.f64 theta)
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
lambda1
(+.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 (*.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
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 #s(literal 1 binary64) (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
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
#s(literal 1 binary64)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(sin.f64 phi1)
#s(literal 2 binary64)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/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
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(cos.f64 theta)
#s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(cos.f64 (*.f64 #s(literal 2 binary64) phi1))
(*.f64 #s(literal 2 binary64) phi1)
#s(literal 2 binary64)
#s(literal 1/2 binary64)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (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 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (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 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
#s(literal -1/2 binary64)
(cos.f64 (+.f64 phi1 phi1))
(+.f64 phi1 phi1)
#s(literal 1/2 binary64)
(neg.f64 (cos.f64 delta))
(cos.f64 delta)
(fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))
(*.f64 (cos.f64 phi1) (cos.f64 theta))
(cos.f64 theta)
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
Outputs
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1)))))) lambda1)
(atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))))))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(sin.f64 theta)
theta
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))
(fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(cos.f64 (+.f64 phi1 phi1))
(+.f64 phi1 phi1)
(cos.f64 delta)
(*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))
(*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1))
(*.f64 (cos.f64 phi1) (cos.f64 theta))
(*.f64 (cos.f64 theta) (cos.f64 phi1))
(cos.f64 theta)
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
lambda1
(+.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 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)
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 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 (sin.f64 delta) theta)))
#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 (sin.f64 delta) theta))
#s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))
(*.f64 (sin.f64 delta) theta)
(*.f64 theta (sin.f64 delta))
(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 (*.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) 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))))))) (-.f64 #s(literal 1 binary64) (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
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
#s(literal 1 binary64)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(sin.f64 phi1)
#s(literal 2 binary64)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 phi1)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 phi1)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/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
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 phi1)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(cos.f64 theta)
#s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
#s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(cos.f64 (*.f64 #s(literal 2 binary64) phi1))
(cos.f64 (+.f64 phi1 phi1))
(*.f64 #s(literal 2 binary64) phi1)
(+.f64 phi1 phi1)
#s(literal 2 binary64)
#s(literal 1/2 binary64)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1)))))) lambda1)
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (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
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
#s(literal -1/2 binary64)
(cos.f64 (+.f64 phi1 phi1))
(+.f64 phi1 phi1)
#s(literal 1/2 binary64)
(neg.f64 (cos.f64 delta))
(cos.f64 delta)
(fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (cos.f64 delta))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1))
(*.f64 (cos.f64 phi1) (cos.f64 theta))
(*.f64 (cos.f64 theta) (cos.f64 phi1))
(cos.f64 theta)
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)

localize602.0ms (3.4%)

Memory
-2.2MiB live, 948.3MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.203125
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy0.2265625
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))
accuracy0.4793217968389034
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
accuracy15.383520525507778
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
accuracy0.203125
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy0.213222509768442
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
accuracy0.36325490239448055
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
accuracy27.99803052700644
#s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
accuracy0.203125
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy0.26400375976844204
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
accuracy0.45338389321931016
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
accuracy28.197692538086187
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
accuracy0.1328125
(*.f64 (sin.f64 delta) theta)
accuracy23.690477118170133
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)))
accuracy26.507005228428095
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
accuracy32.67317483013308
#s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))
accuracy0.2265625
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))
accuracy0.25390625
(*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))
accuracy0.28125
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta))
accuracy0.36325490239448055
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
Samples
292.0ms90×2valid
93.0ms130×0valid
65.0ms36×1valid
Compiler

Compiled 766 to 68 computations (91.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 353.0ms
ival-cos: 100.0ms (28.3% of total)
ival-mult: 69.0ms (19.5% of total)
adjust: 57.0ms (16.1% of total)
ival-sub: 38.0ms (10.8% of total)
ival-sin: 30.0ms (8.5% of total)
ival-add: 27.0ms (7.6% of total)
ival-atan2: 16.0ms (4.5% of total)
ival-asin: 6.0ms (1.7% of total)
ival-neg: 5.0ms (1.4% of total)
ival-pow2: 4.0ms (1.1% of total)
exact: 1.0ms (0.3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series156.0ms (0.9%)

Memory
4.2MiB live, 216.9MiB allocated
Counts
30 → 912
Calls
Call 1
Inputs
#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 delta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 delta) (cos.f64 phi1)) #<representation binary64>) () ())
#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())
#s(alt (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))) (patch (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))) #<representation binary64>) () ())
#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())
#s(alt #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (patch #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())
#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())
#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 2 binary64) phi1) (patch (*.f64 #s(literal 2 binary64) phi1) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())
#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())
#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())
#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 delta) theta) (patch (*.f64 (sin.f64 delta) theta) #<representation binary64>) () ())
#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())
#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())
Outputs
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))) (taylor 0 delta) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta)))))))) (taylor 0 delta) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* 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))))))))) (taylor 0 delta) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta)))))))) (taylor 0 theta) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* 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))))))))) (taylor 0 theta) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (patch (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (cos phi1)) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 delta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 delta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (cos phi1) (* -1/6 (* (pow delta 2) (cos phi1))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 delta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 delta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow delta 2) (cos phi1))))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 delta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 delta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos phi1))) (* 1/120 (cos phi1)))))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 delta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 delta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 delta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 delta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 delta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 delta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 delta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 delta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 delta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 delta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (sin delta) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 delta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 delta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin delta) (* -1/2 (* (pow phi1 2) (sin delta)))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 delta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 delta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow phi1 2) (sin delta)))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 delta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 delta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin delta))) (* 1/24 (sin delta))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 delta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 delta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 delta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 delta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 delta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 delta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 delta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 delta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 delta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 delta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 delta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 delta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 delta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 delta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 delta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 delta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 delta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 delta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* -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))) (taylor -inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* -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))) (taylor -inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* -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))) (taylor -inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta)))))))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* 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))))))))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta)))))))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* 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))))))))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta))) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta))))))) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)))))))) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor 0 theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (patch #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (patch #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta))))))) (taylor 0 theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (patch #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta)))))))) (taylor 0 theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (patch #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (patch #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (patch #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (patch #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (patch #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (patch #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (patch #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (patch #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (patch #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor 0 delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (patch #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta))))) (taylor 0 delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (patch #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta))))))) (taylor 0 delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (patch #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta)))))))) (taylor 0 delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (patch #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (patch #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (patch #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (patch #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (patch #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (patch #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (patch #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (patch #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (patch #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 lambda1) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -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))) (taylor -inf lambda1) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -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))) (taylor -inf lambda1) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -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))) (taylor -inf lambda1) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta)))))))) (taylor 0 theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* 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))))))))) (taylor 0 theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))) (taylor 0 delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta)))))))) (taylor 0 delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* 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))))))))) (taylor 0 delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta))))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta)))))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta))))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta)))))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* 2 phi1) (taylor 0 phi1) (#s(alt (*.f64 #s(literal 2 binary64) phi1) (patch (*.f64 #s(literal 2 binary64) phi1) #<representation binary64>) () ())) ())
#s(alt (* 2 phi1) (taylor 0 phi1) (#s(alt (*.f64 #s(literal 2 binary64) phi1) (patch (*.f64 #s(literal 2 binary64) phi1) #<representation binary64>) () ())) ())
#s(alt (* 2 phi1) (taylor 0 phi1) (#s(alt (*.f64 #s(literal 2 binary64) phi1) (patch (*.f64 #s(literal 2 binary64) phi1) #<representation binary64>) () ())) ())
#s(alt (* 2 phi1) (taylor 0 phi1) (#s(alt (*.f64 #s(literal 2 binary64) phi1) (patch (*.f64 #s(literal 2 binary64) phi1) #<representation binary64>) () ())) ())
#s(alt (* 2 phi1) (taylor inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) phi1) (patch (*.f64 #s(literal 2 binary64) phi1) #<representation binary64>) () ())) ())
#s(alt (* 2 phi1) (taylor inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) phi1) (patch (*.f64 #s(literal 2 binary64) phi1) #<representation binary64>) () ())) ())
#s(alt (* 2 phi1) (taylor inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) phi1) (patch (*.f64 #s(literal 2 binary64) phi1) #<representation binary64>) () ())) ())
#s(alt (* 2 phi1) (taylor inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) phi1) (patch (*.f64 #s(literal 2 binary64) phi1) #<representation binary64>) () ())) ())
#s(alt (* 2 phi1) (taylor -inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) phi1) (patch (*.f64 #s(literal 2 binary64) phi1) #<representation binary64>) () ())) ())
#s(alt (* 2 phi1) (taylor -inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) phi1) (patch (*.f64 #s(literal 2 binary64) phi1) #<representation binary64>) () ())) ())
#s(alt (* 2 phi1) (taylor -inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) phi1) (patch (*.f64 #s(literal 2 binary64) phi1) #<representation binary64>) () ())) ())
#s(alt (* 2 phi1) (taylor -inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) phi1) (patch (*.f64 #s(literal 2 binary64) phi1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta)))))) (taylor 0 phi1) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))))))))) (taylor 0 phi1) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf phi1) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf phi1) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf phi1) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf phi1) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (taylor 0 delta) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/2 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) 1/2)))))) (taylor 0 delta) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 1/2)))))) (taylor 0 delta) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor 0 theta) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))))) (taylor 0 theta) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (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)))))))))))) (taylor 0 theta) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (pow phi1 2))) (taylor 0 phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))) (taylor 0 phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))) (taylor 0 phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/120 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/6 (* (cos phi1) (* (cos theta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* 1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/120 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/5040 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))))))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (* (cos theta) (sin delta)))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* -1 (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (* 1/12 (* (cos theta) (sin delta))))))) (* -1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))) (* (pow phi1 2) (+ (* -1 (* (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)))))))) (* -1 (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (* 1/12 (* (cos theta) (sin delta)))))))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (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)))))))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (patch (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (cos theta))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (cos theta)) (* -1 (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))) (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta))))))) (* -1 (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta))))))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (sin phi1))) (taylor 0 theta) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (sin phi1))) (* 1/2 (* (pow theta 2) (* (cos phi1) (sin phi1))))) (taylor 0 theta) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/2 (* (cos phi1) (sin phi1)))))) (taylor 0 theta) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (sin phi1))) (* 1/720 (* (pow theta 2) (* (cos phi1) (sin phi1))))))))) (taylor 0 theta) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf theta) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf theta) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf theta) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf theta) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf theta) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf theta) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf theta) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf theta) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ 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)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ (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))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ (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))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta theta) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 delta) theta) (patch (*.f64 (sin.f64 delta) theta) #<representation binary64>) () ())) ())
#s(alt (* delta (+ theta (* -1/6 (* (pow delta 2) theta)))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 delta) theta) (patch (*.f64 (sin.f64 delta) theta) #<representation binary64>) () ())) ())
#s(alt (* delta (+ theta (* (pow delta 2) (+ (* -1/6 theta) (* 1/120 (* (pow delta 2) theta)))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 delta) theta) (patch (*.f64 (sin.f64 delta) theta) #<representation binary64>) () ())) ())
#s(alt (* delta (+ theta (* (pow delta 2) (+ (* -1/6 theta) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) theta)) (* 1/120 theta))))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 delta) theta) (patch (*.f64 (sin.f64 delta) theta) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) theta) (patch (*.f64 (sin.f64 delta) theta) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) theta) (patch (*.f64 (sin.f64 delta) theta) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) theta) (patch (*.f64 (sin.f64 delta) theta) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) theta) (patch (*.f64 (sin.f64 delta) theta) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) theta) (patch (*.f64 (sin.f64 delta) theta) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) theta) (patch (*.f64 (sin.f64 delta) theta) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) theta) (patch (*.f64 (sin.f64 delta) theta) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) theta) (patch (*.f64 (sin.f64 delta) theta) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 delta) theta) (patch (*.f64 (sin.f64 delta) theta) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 delta) theta) (patch (*.f64 (sin.f64 delta) theta) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 delta) theta) (patch (*.f64 (sin.f64 delta) theta) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 delta) theta) (patch (*.f64 (sin.f64 delta) theta) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 delta) theta) (patch (*.f64 (sin.f64 delta) theta) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 delta) theta) (patch (*.f64 (sin.f64 delta) theta) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 delta) theta) (patch (*.f64 (sin.f64 delta) theta) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 delta) theta) (patch (*.f64 (sin.f64 delta) theta) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 delta) theta) (patch (*.f64 (sin.f64 delta) theta) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 delta) theta) (patch (*.f64 (sin.f64 delta) theta) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 delta) theta) (patch (*.f64 (sin.f64 delta) theta) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 delta) theta) (patch (*.f64 (sin.f64 delta) theta) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 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)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (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))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (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))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (pow phi1 2))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow phi1 2) (taylor 0 phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2)))) (taylor 0 phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3)))) (taylor 0 phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3)))) (taylor 0 phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor -inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor -inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor -inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor -inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (pow phi1 2) (cos delta)))) (taylor 0 phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta)))) (taylor 0 phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta)))) (taylor 0 phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor 0 delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1 (* (pow delta 2) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* 1/2 (cos (* 2 phi1))))) (taylor 0 delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))))) (taylor 0 delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))))) (taylor 0 delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (pow phi1 2))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (sin delta))) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (sin delta)) (* -1 (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* -1/6 (sin delta))))))) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (sin delta)) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (sin delta)) (+ (* 1/24 (sin delta)) (* 1/12 (sin delta)))))) (* -1 (+ (* -1/2 (sin delta)) (* -1/6 (sin delta)))))))) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (sin delta)) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (sin delta)) (* -1/6 (sin delta)))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* -1/144 (sin delta)) (+ (* -1/240 (sin delta)) (+ (* -1/720 (sin delta)) (* -1/5040 (sin delta))))))) (* -1 (+ (* 1/120 (sin delta)) (+ (* 1/24 (sin delta)) (* 1/12 (sin delta))))))))))) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* delta (* (cos phi1) (sin phi1)))) (taylor 0 delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* 1/6 (* (pow delta 2) (* (cos phi1) (sin phi1)))))) (taylor 0 delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow delta 2) (+ (* -1/120 (* (pow delta 2) (* (cos phi1) (sin phi1)))) (* 1/6 (* (cos phi1) (sin phi1))))))) (taylor 0 delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow delta 2) (+ (* 1/6 (* (cos phi1) (sin phi1))) (* (pow delta 2) (+ (* -1/120 (* (cos phi1) (sin phi1))) (* 1/5040 (* (pow delta 2) (* (cos phi1) (sin phi1)))))))))) (taylor 0 delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor inf delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor inf delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor inf delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor inf delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor -inf delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor -inf delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor -inf delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor -inf delta) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (pow phi1 2) (taylor 0 phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2)))) (taylor 0 phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3)))) (taylor 0 phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3)))) (taylor 0 phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
Calls

228 calls:

TimeVariablePointExpression
26.0ms
delta
@-inf
(+ (* (+ (* -1/2 (cos (+ phi1 phi1))) 1/2) (neg (cos delta))) (+ (* (sin delta) (* (* (cos phi1) (cos theta)) (neg (sin phi1)))) (cos delta)))
5.0ms
lambda1
@-inf
(+ (atan2 (* (* (sin delta) (cos phi1)) (sin theta)) (+ (* (+ (* 1/2 (cos (+ phi1 phi1))) 1/2) (cos delta)) (* (sin delta) (* (* (cos phi1) (cos theta)) (neg (sin phi1)))))) lambda1)
3.0ms
theta
@inf
(+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))))
1.0ms
theta
@inf
(+ (* (+ (* -1/2 (cos (+ phi1 phi1))) 1/2) (neg (cos delta))) (+ (* (sin delta) (* (* (cos phi1) (cos theta)) (neg (sin phi1)))) (cos delta)))
1.0ms
delta
@inf
(+ (* (+ (* -1/2 (cos (+ phi1 phi1))) 1/2) (neg (cos delta))) (+ (* (sin delta) (* (* (cos phi1) (cos theta)) (neg (sin phi1)))) (cos delta)))

simplify328.0ms (1.9%)

Memory
16.8MiB live, 371.8MiB allocated
Algorithm
egg-herbie
Rules
6 698×lower-fma.f64
6 698×lower-fma.f32
3 418×lower-*.f64
3 418×lower-*.f32
2 055×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
060121185
1213920373
2670920276
0807119297
Stop Event
iter limit
node limit
Counts
912 → 902
Calls
Call 1
Inputs
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (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 phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* 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 phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* 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 phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (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 phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(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 (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)))
(* 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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 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)))
(* -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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(+ lambda1 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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 phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin 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)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (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 phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* 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))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (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))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(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 (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)))
(* 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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) 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)))
(* -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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(+ lambda1 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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 phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin 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)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (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 phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* 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))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (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))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* 2 phi1)
(* 2 phi1)
(* 2 phi1)
(* 2 phi1)
(* 2 phi1)
(* 2 phi1)
(* 2 phi1)
(* 2 phi1)
(* 2 phi1)
(* 2 phi1)
(* 2 phi1)
(* 2 phi1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(cos delta)
(+ (cos delta) (* -1 (* phi1 (* (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) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))
(+ 1 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))))
(+ 1 (+ (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/2 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) 1/2))))))
(+ 1 (+ (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 1/2))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (sin delta) (sin phi1))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (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 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (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) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
1
(+ 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)))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))
(* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))
(* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1)))))))
(* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/120 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/6 (* (cos phi1) (* (cos theta) (sin phi1))))))))
(* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* 1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/120 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/5040 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1)))))))))))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* -1 (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))))
(* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (* 1/12 (* (cos theta) (sin delta))))))) (* -1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))))
(* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))) (* (pow phi1 2) (+ (* -1 (* (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)))))))) (* -1 (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (* 1/12 (* (cos theta) (sin delta))))))))))))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))
(+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (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))))))))))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(* -1 (* phi1 (cos theta)))
(* phi1 (+ (* -1 (cos theta)) (* -1 (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))))))
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))) (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))))
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta))))))) (* -1 (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))))))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (sin phi1)))
(+ (* -1 (* (cos phi1) (sin phi1))) (* 1/2 (* (pow theta 2) (* (cos phi1) (sin phi1)))))
(+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/2 (* (cos phi1) (sin phi1))))))
(+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (sin phi1))) (* 1/720 (* (pow theta 2) (* (cos phi1) (sin phi1)))))))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin 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))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (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)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(* delta theta)
(* delta (+ theta (* -1/6 (* (pow delta 2) theta))))
(* delta (+ theta (* (pow delta 2) (+ (* -1/6 theta) (* 1/120 (* (pow delta 2) theta))))))
(* delta (+ theta (* (pow delta 2) (+ (* -1/6 theta) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) theta)) (* 1/120 theta)))))))
(* theta (sin delta))
(* theta (sin delta))
(* theta (sin delta))
(* theta (sin delta))
(* theta (sin delta))
(* theta (sin delta))
(* theta (sin delta))
(* theta (sin delta))
(* theta (sin delta))
(* theta (sin delta))
(* theta (sin delta))
(* theta (sin delta))
(* theta (sin delta))
(* theta (sin delta))
(* theta (sin delta))
(* theta (sin delta))
(* theta (sin delta))
(* theta (sin delta))
(* theta (sin delta))
(* 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))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (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)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
1
(+ 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)))
(- 1 (pow (sin phi1) 2))
(- 1 (pow (sin phi1) 2))
(- 1 (pow (sin phi1) 2))
(- 1 (pow (sin phi1) 2))
(- 1 (pow (sin phi1) 2))
(- 1 (pow (sin phi1) 2))
(- 1 (pow (sin phi1) 2))
(- 1 (pow (sin phi1) 2))
(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))))
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(cos delta)
(+ (cos delta) (* -1 (* (pow phi1 2) (cos delta))))
(+ (cos delta) (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta))))
(+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (+ (* -1 (* (pow delta 2) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* 1/2 (cos (* 2 phi1)))))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
1
(+ 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)))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(* -1 (* phi1 (sin delta)))
(* phi1 (+ (* -1 (sin delta)) (* -1 (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* -1/6 (sin delta)))))))
(* phi1 (+ (* -1 (sin delta)) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (sin delta)) (+ (* 1/24 (sin delta)) (* 1/12 (sin delta)))))) (* -1 (+ (* -1/2 (sin delta)) (* -1/6 (sin delta))))))))
(* phi1 (+ (* -1 (sin delta)) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (sin delta)) (* -1/6 (sin delta)))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* -1/144 (sin delta)) (+ (* -1/240 (sin delta)) (+ (* -1/720 (sin delta)) (* -1/5040 (sin delta))))))) (* -1 (+ (* 1/120 (sin delta)) (+ (* 1/24 (sin delta)) (* 1/12 (sin delta)))))))))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* delta (* (cos phi1) (sin phi1))))
(* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* 1/6 (* (pow delta 2) (* (cos phi1) (sin phi1))))))
(* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow delta 2) (+ (* -1/120 (* (pow delta 2) (* (cos phi1) (sin phi1)))) (* 1/6 (* (cos phi1) (sin phi1)))))))
(* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow delta 2) (+ (* 1/6 (* (cos phi1) (sin phi1))) (* (pow delta 2) (+ (* -1/120 (* (cos phi1) (sin phi1))) (* 1/5040 (* (pow delta 2) (* (cos phi1) (sin phi1))))))))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(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))))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
Outputs
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1)))) lambda1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))))
(* delta (* (cos phi1) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) delta) (cos.f64 phi1))
(* 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 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (cos.f64 phi1)) (*.f64 (*.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))) delta)
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 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 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)) (*.f64 (*.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)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (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 (*.f64 #s(literal -1/6 binary64) 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 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (*.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 theta theta))) theta)
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* delta (cos phi1))
(*.f64 delta (cos.f64 phi1))
(* 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 (*.f64 (cos.f64 phi1) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) 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 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (cos.f64 phi1) (*.f64 (*.f64 (*.f64 delta delta) (*.f64 delta delta)) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))))) delta)
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 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 (*.f64 phi1 phi1) (*.f64 phi1 phi1)) (*.f64 (sin.f64 delta) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64)))))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (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 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) 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 #s(literal -1 binary64) (/.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) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 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)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.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) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 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)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.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) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)))
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (*.f64 #s(literal -1/6 binary64) 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 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (*.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 theta theta))) theta)
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* delta (* (cos phi1) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) delta) (cos.f64 phi1))
(* 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 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (cos.f64 phi1)) (*.f64 (*.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))) delta)
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 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 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)) (*.f64 (*.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)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) 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 (*.f64 (sin.f64 delta) (fma.f64 #s(literal 1/120 binary64) (*.f64 theta theta) #s(literal -1/6 binary64))) 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 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (sin.f64 delta) (*.f64 (*.f64 (*.f64 theta theta) (*.f64 theta theta)) (*.f64 (sin.f64 delta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))))) theta)
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 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 (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) 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 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta) (*.f64 (*.f64 (*.f64 delta delta) (*.f64 delta delta)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))))) delta)
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (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 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) 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 #s(literal -1 binary64) (/.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) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 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)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.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) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 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)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.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) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)))
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+ 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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (*.f64 #s(literal -1/6 binary64) 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 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (*.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 theta theta))) theta)
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* delta (* (cos phi1) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) delta) (cos.f64 phi1))
(* 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 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (cos.f64 phi1)) (*.f64 (*.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))) delta)
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 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 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)) (*.f64 (*.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)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) 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 (*.f64 (sin.f64 delta) (fma.f64 #s(literal 1/120 binary64) (*.f64 theta theta) #s(literal -1/6 binary64))) 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 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (sin.f64 delta) (*.f64 (*.f64 (*.f64 theta theta) (*.f64 theta theta)) (*.f64 (sin.f64 delta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))))) theta)
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 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 (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) 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 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta) (*.f64 (*.f64 (*.f64 delta delta) (*.f64 delta delta)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))))) delta)
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* 2 phi1)
(*.f64 #s(literal 2 binary64) phi1)
(* 2 phi1)
(*.f64 #s(literal 2 binary64) phi1)
(* 2 phi1)
(*.f64 #s(literal 2 binary64) phi1)
(* 2 phi1)
(*.f64 #s(literal 2 binary64) phi1)
(* 2 phi1)
(*.f64 #s(literal 2 binary64) phi1)
(* 2 phi1)
(*.f64 #s(literal 2 binary64) phi1)
(* 2 phi1)
(*.f64 #s(literal 2 binary64) phi1)
(* 2 phi1)
(*.f64 #s(literal 2 binary64) phi1)
(* 2 phi1)
(*.f64 #s(literal 2 binary64) phi1)
(* 2 phi1)
(*.f64 #s(literal 2 binary64) phi1)
(* 2 phi1)
(*.f64 #s(literal 2 binary64) phi1)
(* 2 phi1)
(*.f64 #s(literal 2 binary64) phi1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1) lambda1 lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(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))) (* -1 (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (fma.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal 2/3 binary64))) phi1 (neg.f64 (cos.f64 delta))) phi1 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta))) phi1 (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin 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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin 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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin 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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin 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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin 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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin 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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin 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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin 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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(+ 1 (* -1 (+ 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 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))))
(fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 phi1) (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 (+ (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/2 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) 1/2))))))
(fma.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1) (*.f64 (-.f64 (fma.f64 #s(literal -1/4 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)) delta)) delta (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+ 1 (+ (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 1/2))))))
(fma.f64 (fma.f64 (+.f64 (fma.f64 #s(literal -1/4 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/4 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1) #s(literal -1/2 binary64))) delta (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) delta (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin 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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin 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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin 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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin 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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin 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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin 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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin 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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin 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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (sin delta) (sin 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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (sin.f64 phi1) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin 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) (fma.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 theta theta) #s(literal -1 binary64)) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (*.f64 theta theta) #s(literal 1/2 binary64))) theta) 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 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta))))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (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 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (cos.f64 delta) (+.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 theta theta) #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 theta theta) (*.f64 theta theta)) (*.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64))))) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin 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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin 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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin 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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin 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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin 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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin 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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin 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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin 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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (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)) (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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (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)) (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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (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)) (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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1) lambda1 lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
1
#s(literal 1 binary64)
(+ 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 (fma.f64 (*.f64 #s(literal 1/3 binary64) phi1) phi1 #s(literal -1 binary64)) phi1) phi1 #s(literal 1 binary64))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2/45 binary64) phi1) phi1 #s(literal 1/3 binary64)) phi1) phi1 #s(literal -1 binary64)) phi1) phi1 #s(literal 1 binary64))
(+ 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/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/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/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/2 (cos (neg (* -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/2 (cos (neg (* -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/2 (cos (neg (* -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/2 (cos (neg (* -2 phi1)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))
(*.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))
(* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1)))))))
(*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) (fma.f64 (*.f64 #s(literal 1/6 binary64) delta) delta #s(literal -1 binary64))) delta)
(* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/120 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/6 (* (cos phi1) (* (cos theta) (sin phi1))))))))
(*.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/120 binary64) (*.f64 delta delta) #s(literal 1/6 binary64))) (*.f64 delta delta))) delta)
(* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* 1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/120 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/5040 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1)))))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) (fma.f64 (*.f64 #s(literal 1/6 binary64) delta) delta #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 delta delta) (*.f64 delta delta)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/5040 binary64) (*.f64 delta delta) #s(literal -1/120 binary64))))) delta)
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))
(* -1 (* phi1 (* (cos theta) (sin delta))))
(*.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* -1 (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))))
(*.f64 (fma.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal 2/3 binary64))) (*.f64 phi1 phi1))) phi1)
(* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (* 1/12 (* (cos theta) (sin delta))))))) (* -1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))))
(*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal -2/15 binary64)) phi1) phi1 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal 2/3 binary64)))) phi1) phi1 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta))) phi1)
(* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))) (* (pow phi1 2) (+ (* -1 (* (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)))))))) (* -1 (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (* 1/12 (* (cos theta) (sin delta))))))))))))
(*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.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)))) phi1) (neg.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal -2/15 binary64))) phi1) phi1 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal 2/3 binary64)))) phi1) phi1 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta))) phi1)
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))
(*.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 theta theta) #s(literal -1 binary64)))
(+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (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) (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 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta))))
(+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (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 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 theta theta) #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 theta theta) (*.f64 theta theta)) (*.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64)))))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))
(* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))
(* -1 (* phi1 (cos theta)))
(*.f64 (neg.f64 phi1) (cos.f64 theta))
(* phi1 (+ (* -1 (cos theta)) (* -1 (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))))))
(*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)) phi1) phi1 (cos.f64 theta))) phi1)
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))) (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))))
(*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 theta) #s(literal -2/15 binary64)) phi1) phi1 (*.f64 (cos.f64 theta) #s(literal 2/3 binary64))) phi1) phi1 (neg.f64 (cos.f64 theta))) phi1)
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta))))))) (* -1 (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))))))))
(*.f64 (fma.f64 (fma.f64 (neg.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/144 binary64) (cos.f64 theta) (*.f64 (cos.f64 theta) #s(literal -29/5040 binary64))) phi1) phi1 (*.f64 (cos.f64 theta) #s(literal 2/15 binary64)))) (*.f64 phi1 phi1) (*.f64 (cos.f64 theta) #s(literal 2/3 binary64))) (*.f64 phi1 phi1) (neg.f64 (cos.f64 theta))) phi1)
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* -1 (* (cos phi1) (sin phi1)))
(*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1))
(+ (* -1 (* (cos phi1) (sin phi1))) (* 1/2 (* (pow theta 2) (* (cos phi1) (sin phi1)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 theta theta) #s(literal -1 binary64)))
(+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/2 (* (cos phi1) (sin phi1))))))
(fma.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1) (*.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)))
(+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (sin phi1))) (* 1/720 (* (pow theta 2) (* (cos phi1) (sin phi1)))))))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 theta theta) #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 theta theta) (*.f64 theta theta)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64)))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.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 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1) (*.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) delta)) delta (-.f64 #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))
(fma.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1) (*.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) delta) (*.f64 (cos.f64 phi1) (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))
(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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (fma.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal 2/3 binary64))) phi1 (neg.f64 (cos.f64 delta))) phi1 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta))) phi1 (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (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)))))
(fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 theta theta)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.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)))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (sin.f64 delta)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (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) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))
(* delta theta)
(*.f64 theta delta)
(* delta (+ theta (* -1/6 (* (pow delta 2) theta))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) theta) delta)
(* delta (+ theta (* (pow delta 2) (+ (* -1/6 theta) (* 1/120 (* (pow delta 2) theta))))))
(*.f64 (fma.f64 (*.f64 (*.f64 theta (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) delta) delta theta) delta)
(* delta (+ theta (* (pow delta 2) (+ (* -1/6 theta) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) theta)) (* 1/120 theta)))))))
(*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 theta (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))) delta) delta (*.f64 #s(literal -1/6 binary64) theta)) delta) delta theta) delta)
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.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 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1) (*.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) delta)) delta (-.f64 #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))
(fma.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1) (*.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) delta) (*.f64 (cos.f64 phi1) (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))
(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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (fma.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal 2/3 binary64))) phi1 (neg.f64 (cos.f64 delta))) phi1 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta))) phi1 (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (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)))))
(fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 theta theta)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.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)))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (sin.f64 delta)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (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) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.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 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))
1
#s(literal 1 binary64)
(+ 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 (fma.f64 (*.f64 #s(literal 1/3 binary64) phi1) phi1 #s(literal -1 binary64)) phi1) phi1 #s(literal 1 binary64))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2/45 binary64) phi1) phi1 #s(literal 1/3 binary64)) phi1) phi1 #s(literal -1 binary64)) phi1) phi1 #s(literal 1 binary64))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/3 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) phi1)
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal 2/45 binary64) phi1) phi1 #s(literal -1/3 binary64)) phi1) phi1 #s(literal 1 binary64)) phi1) phi1)
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/315 binary64) phi1) phi1 #s(literal 2/45 binary64)) phi1) phi1 #s(literal -1/3 binary64)) phi1) phi1 #s(literal 1 binary64)) phi1) phi1)
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* (pow phi1 2) (cos delta))))
(*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta))
(+ (cos delta) (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta))))
(fma.f64 (*.f64 (*.f64 (cos.f64 delta) (fma.f64 (*.f64 #s(literal 1/3 binary64) phi1) phi1 #s(literal -1 binary64))) phi1) phi1 (cos.f64 delta))
(+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta))))
(fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 delta) (fma.f64 (*.f64 #s(literal -2/45 binary64) phi1) phi1 #s(literal 1/3 binary64))) phi1) phi1 (neg.f64 (cos.f64 delta))) phi1) phi1 (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 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) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 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) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 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) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 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) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 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) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 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) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 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) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 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) (cos.f64 delta))
(+ 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 (* (pow delta 2) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* 1/2 (cos (* 2 phi1)))))
(fma.f64 (-.f64 (fma.f64 #s(literal -1/4 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)) (*.f64 delta 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))) (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))
(fma.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)) #s(literal 1/24 binary64)) delta) delta (-.f64 (fma.f64 #s(literal -1/4 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64))) (*.f64 delta 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))) (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))
(fma.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)) #s(literal -1/720 binary64) #s(literal 1/720 binary64)) delta) (neg.f64 delta) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)) #s(literal 1/24 binary64))) delta) delta (-.f64 (fma.f64 #s(literal -1/4 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64))) (*.f64 delta delta) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 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) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 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) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 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) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 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) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 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) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 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) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 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) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 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) (cos.f64 delta))
1
#s(literal 1 binary64)
(+ 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 (fma.f64 (*.f64 #s(literal 1/3 binary64) phi1) phi1 #s(literal -1 binary64)) phi1) phi1 #s(literal 1 binary64))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2/45 binary64) phi1) phi1 #s(literal 1/3 binary64)) phi1) phi1 #s(literal -1 binary64)) phi1) phi1 #s(literal 1 binary64))
(+ 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/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/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/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/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/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/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/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 (* phi1 (sin delta)))
(*.f64 (neg.f64 phi1) (sin.f64 delta))
(* phi1 (+ (* -1 (sin delta)) (* -1 (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* -1/6 (sin delta)))))))
(*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 delta) #s(literal -2/3 binary64)) phi1) phi1 (sin.f64 delta))) phi1)
(* phi1 (+ (* -1 (sin delta)) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (sin delta)) (+ (* 1/24 (sin delta)) (* 1/12 (sin delta)))))) (* -1 (+ (* -1/2 (sin delta)) (* -1/6 (sin delta))))))))
(*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 delta) #s(literal -2/15 binary64)) phi1) phi1 (*.f64 (sin.f64 delta) #s(literal 2/3 binary64))) phi1) phi1 (neg.f64 (sin.f64 delta))) phi1)
(* phi1 (+ (* -1 (sin delta)) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (sin delta)) (* -1/6 (sin delta)))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* -1/144 (sin delta)) (+ (* -1/240 (sin delta)) (+ (* -1/720 (sin delta)) (* -1/5040 (sin delta))))))) (* -1 (+ (* 1/120 (sin delta)) (+ (* 1/24 (sin delta)) (* 1/12 (sin delta)))))))))))
(*.f64 (fma.f64 (fma.f64 (neg.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/144 binary64) (sin.f64 delta) (*.f64 (sin.f64 delta) #s(literal -29/5040 binary64))) phi1) phi1 (*.f64 (sin.f64 delta) #s(literal 2/15 binary64)))) (*.f64 phi1 phi1) (*.f64 (sin.f64 delta) #s(literal 2/3 binary64))) (*.f64 phi1 phi1) (neg.f64 (sin.f64 delta))) phi1)
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* delta (* (cos phi1) (sin phi1))))
(*.f64 (*.f64 delta (sin.f64 phi1)) (neg.f64 (cos.f64 phi1)))
(* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* 1/6 (* (pow delta 2) (* (cos phi1) (sin phi1))))))
(*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (fma.f64 (*.f64 #s(literal 1/6 binary64) delta) delta #s(literal -1 binary64))) delta)
(* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow delta 2) (+ (* -1/120 (* (pow delta 2) (* (cos phi1) (sin phi1)))) (* 1/6 (* (cos phi1) (sin phi1)))))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (fma.f64 #s(literal -1/120 binary64) (*.f64 delta delta) #s(literal 1/6 binary64))) (*.f64 delta delta))) delta)
(* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow delta 2) (+ (* 1/6 (* (cos phi1) (sin phi1))) (* (pow delta 2) (+ (* -1/120 (* (cos phi1) (sin phi1))) (* 1/5040 (* (pow delta 2) (* (cos phi1) (sin phi1))))))))))
(*.f64 (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (fma.f64 (*.f64 #s(literal 1/6 binary64) delta) delta #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 delta delta) (*.f64 delta delta)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (fma.f64 #s(literal 1/5040 binary64) (*.f64 delta delta) #s(literal -1/120 binary64))))) delta)
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* -1 (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/3 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) phi1)
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal 2/45 binary64) phi1) phi1 #s(literal -1/3 binary64)) phi1) phi1 #s(literal 1 binary64)) phi1) phi1)
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/315 binary64) phi1) phi1 #s(literal 2/45 binary64)) phi1) phi1 #s(literal -1/3 binary64)) phi1) phi1 #s(literal 1 binary64)) phi1) 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))
(+ 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))
(+ 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))
(+ 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))
(+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))

rewrite335.0ms (1.9%)

Memory
-10.4MiB live, 414.0MiB allocated
Rules
2 910×lower-fma.f32
2 903×lower-fma.f64
2 860×lower-*.f32
2 850×lower-*.f64
1 431×lower-+.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
076619
0125596
1466533
23264533
09439527
Stop Event
iter limit
node limit
iter limit
Counts
30 → 667
Calls
Call 1
Inputs
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta))
(*.f64 (sin.f64 delta) (cos.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 (*.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(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 #s(literal 1 binary64) (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 #s(literal 2 binary64) phi1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (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 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.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 delta) theta)
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
#s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
Outputs
(*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) lambda1)))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))))))
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 2 binary64)))))
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) lambda1) (*.f64 lambda1 lambda1))))
(pow.f64 (/.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 2 binary64))) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.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 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.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 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.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 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) lambda1))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 3 binary64))) (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 2 binary64))) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 3 binary64)))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))))
(*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (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 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (sin.f64 theta)) #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 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) #s(literal 1/2 binary64))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))))
(*.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 #s(literal 1 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 (fma.f64 (*.f64 lambda1 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 3 binary64))) (/.f64 #s(literal 1 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))))
(pow.f64 (/.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 (*.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)))) #s(literal -1 binary64))
(pow.f64 (/.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)) (fma.f64 (*.f64 lambda1 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 3 binary64)))) #s(literal -1 binary64))
(/.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 (fma.f64 (*.f64 lambda1 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 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 (fma.f64 (*.f64 lambda1 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 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 (fma.f64 (*.f64 lambda1 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 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 #s(literal 1 binary64) (/.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 (*.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 #s(literal 1 binary64) (/.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)) (fma.f64 (*.f64 lambda1 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 3 binary64)))))
(-.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 (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 (*.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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 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 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))
(*.f64 (fma.f64 (*.f64 lambda1 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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) lambda1) (*.f64 lambda1 lambda1))))
(pow.f64 (/.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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (-.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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) #s(literal -1 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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (fma.f64 (*.f64 lambda1 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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) lambda1))))
(/.f64 (fma.f64 (*.f64 lambda1 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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 #s(literal 1 binary64) (/.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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (-.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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 3 binary64)))))
(-.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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))
(+.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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) 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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(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 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (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 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (sin.f64 theta)) #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 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal -1 binary64))
(/.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 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))))
(-.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)))
(*.f64 (*.f64 (fma.f64 phi1 phi1 #s(literal 0 binary64)) (+.f64 phi1 phi1)) (/.f64 #s(literal 1 binary64) (fma.f64 phi1 phi1 #s(literal 0 binary64))))
(*.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) #s(literal 0 binary64)))
(*.f64 #s(literal 2 binary64) phi1)
(*.f64 phi1 #s(literal 2 binary64))
(pow.f64 (/.f64 (fma.f64 phi1 phi1 #s(literal 0 binary64)) (*.f64 (fma.f64 phi1 phi1 #s(literal 0 binary64)) (+.f64 phi1 phi1))) #s(literal -1 binary64))
(pow.f64 (+.f64 phi1 phi1) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (fma.f64 phi1 phi1 #s(literal 0 binary64)) (+.f64 phi1 phi1))) (neg.f64 (fma.f64 phi1 phi1 #s(literal 0 binary64))))
(/.f64 (*.f64 (fma.f64 phi1 phi1 #s(literal 0 binary64)) (+.f64 phi1 phi1)) (fma.f64 phi1 phi1 #s(literal 0 binary64)))
(/.f64 #s(literal 0 binary64) #s(literal 0 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 phi1 phi1 #s(literal 0 binary64)) (*.f64 (fma.f64 phi1 phi1 #s(literal 0 binary64)) (+.f64 phi1 phi1))))
(/.f64 #s(literal 1 binary64) (+.f64 phi1 phi1))
(-.f64 (/.f64 (*.f64 phi1 phi1) #s(literal 0 binary64)) (/.f64 (*.f64 phi1 phi1) #s(literal 0 binary64)))
(+.f64 phi1 phi1)
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) lambda1) (*.f64 lambda1 lambda1))))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/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)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/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)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) lambda1))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 3 binary64)))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(*.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta))))))
(*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))))
(*.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)) (-.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))))
(*.f64 (fma.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(pow.f64 (/.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)))) (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)) (-.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta))))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))) (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (neg.f64 (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))))
(/.f64 (fma.f64 (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (neg.f64 (cos.f64 delta))) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))))))
(/.f64 (fma.f64 (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (neg.f64 (cos.f64 delta))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))))
(/.f64 (fma.f64 (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (neg.f64 (cos.f64 delta))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta))))))
(/.f64 (fma.f64 (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (neg.f64 (cos.f64 delta))) (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (neg.f64 (cos.f64 delta))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta)))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta))))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))) (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta)))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta))))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))) (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) #s(literal 1 binary64))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) #s(literal 1 binary64))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)))) (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta)))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta)))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) #s(literal 1 binary64))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) #s(literal 1 binary64))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta)))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) #s(literal 1 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) #s(literal 1 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta)))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #s(literal 1 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #s(literal 1 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (neg.f64 (cos.f64 delta))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (neg.f64 (cos.f64 delta))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (neg.f64 (cos.f64 delta))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (neg.f64 (cos.f64 delta))))) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))))) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))))) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)))))) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))))) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))))) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta)))) (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta)))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (neg.f64 (cos.f64 delta))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta)))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta)))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta)))) (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta)))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta)))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta)))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta)))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta)))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta)))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta)))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta)))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta)))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (neg.f64 (cos.f64 delta))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (*.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (neg.f64 (cos.f64 delta))))) (*.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))))) (*.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (*.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))))) (*.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)))))) (*.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (*.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (*.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (*.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (neg.f64 (cos.f64 delta))))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (*.f64 (neg.f64 (cos.f64 delta)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)))))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (cos.f64 delta)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)) (-.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)) (-.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 delta))))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)))) (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)) (-.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64)))))
(fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) #s(literal -1 binary64)) (sin.f64 phi1) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 1/2 binary64) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 delta)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)) (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (cos.f64 delta)))) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))
(fma.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (neg.f64 (cos.f64 delta)))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta))) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)))
(fma.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)))
(fma.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))
(fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal -1 binary64) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)))
(fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)))
(fma.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 theta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 delta) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (sin.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 (+.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)) #s(literal 0 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(-.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta))))) (/.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) (/.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))))
(-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta))))
(-.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(+.f64 (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (cos.f64 delta))
(+.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))
(+.f64 (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)))
(+.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(+.f64 (cos.f64 delta) (fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))))
(*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) lambda1)))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))))))
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 2 binary64)))))
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) lambda1) (*.f64 lambda1 lambda1))))
(pow.f64 (/.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 2 binary64))) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.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 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.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 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.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 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) lambda1))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 3 binary64))) (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 2 binary64))) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 3 binary64)))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))))
(*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(pow.f64 (/.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(/.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) (neg.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (*.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(fma.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1) #s(literal 1 binary64))
(fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) #s(literal 1 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(-.f64 (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (cos.f64 phi1)) #s(literal 2 binary64)))
(+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(+.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) #s(literal -1 binary64)) (sin.f64 phi1))
(*.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1))
(*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
(*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta))))
(*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (neg.f64 (sin.f64 phi1)))
(*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)))
(*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)))
(*.f64 (cos.f64 theta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (sin.f64 delta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)))
(*.f64 (cos.f64 phi1) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (sin.f64 delta)))
(*.f64 (sin.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))))
(neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (sin.f64 phi1)))
(neg.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1)))))
(neg.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(neg.f64 (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta)))
(neg.f64 (*.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta))))
(neg.f64 (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))
(*.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) #s(literal -1 binary64)) (sin.f64 phi1))
(*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (cos.f64 theta))
(*.f64 (neg.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))
(*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (cos.f64 phi1))
(*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))))
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
(*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 phi1)))
(*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 theta phi1))) (neg.f64 (sin.f64 phi1))) #s(literal 2 binary64))
(/.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 theta phi1)))) #s(literal 2 binary64))
(neg.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))))
(-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 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 theta (sin.f64 delta))
(*.f64 (sin.f64 delta) theta)
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))))
(*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(pow.f64 (/.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(/.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) (neg.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (*.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(fma.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1) #s(literal 1 binary64))
(fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) #s(literal 1 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(-.f64 (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (cos.f64 phi1)) #s(literal 2 binary64)))
(+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(+.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) #s(literal 1 binary64)) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal 1 binary64)) (pow.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (sin.f64 phi1)) #s(literal 1 binary64)) (sin.f64 phi1))
(*.f64 (pow.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))) #s(literal 1 binary64)))
(*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(*.f64 (*.f64 #s(literal 1 binary64) (sin.f64 phi1)) (sin.f64 phi1))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (sin.f64 phi1))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (sin.f64 phi1)))
(pow.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (neg.f64 (sin.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(/.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(fma.f64 (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 phi1)) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 phi1)) #s(literal 2 binary64)))
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
#s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))))
(*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(pow.f64 (/.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(/.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) (neg.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (*.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(fma.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1) #s(literal 1 binary64))
(fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) #s(literal 1 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(-.f64 (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (cos.f64 phi1)) #s(literal 2 binary64)))
(+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(+.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (sin.f64 delta))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) #s(literal -1 binary64)) (sin.f64 phi1))
(*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(*.f64 (sin.f64 phi1) (neg.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (sin.f64 phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (neg.f64 (sin.f64 phi1))) #s(literal 2 binary64))
(/.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))) #s(literal 2 binary64))
(neg.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(*.f64 (pow.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) #s(literal 1 binary64)) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal 1 binary64)) (pow.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (sin.f64 phi1)) #s(literal 1 binary64)) (sin.f64 phi1))
(*.f64 (pow.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))) #s(literal 1 binary64)))
(*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(*.f64 (*.f64 #s(literal 1 binary64) (sin.f64 phi1)) (sin.f64 phi1))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (sin.f64 phi1))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (sin.f64 phi1)))
(pow.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (neg.f64 (sin.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(/.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(fma.f64 (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 phi1)) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 phi1)) #s(literal 2 binary64)))
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))

eval329.0ms (1.9%)

Memory
-17.6MiB live, 515.4MiB allocated
Compiler

Compiled 82 004 to 3 699 computations (95.5% saved)

prune666.0ms (3.8%)

Memory
12.0MiB live, 884.4MiB allocated
Pruning

72 alts after pruning (68 fresh and 4 done)

PrunedKeptTotal
New1 761341 795
Fresh163450
Picked325
Done123
Total1 781721 853
Accuracy
100.0%
Counts
1 853 → 72
Alt Table
Click to see full alt table
StatusAccuracyProgram
38.4%
(/.f64 (-.f64 (pow.f64 (pow.f64 (sqrt.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.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) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1))
48.1%
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1)) (*.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))))
57.6%
(/.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))
78.6%
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
77.6%
(+.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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) lambda1)
99.8%
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
99.7%
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
93.9%
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) #s(approx (* (* (cos phi1) (cos theta)) (neg (sin phi1))) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1)))))) lambda1)
99.8%
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
88.0%
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
87.8%
(+.f64 (atan2.f64 (*.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
74.0%
(+.f64 (atan2.f64 #s(approx (* (* (sin delta) (cos phi1)) (sin theta)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
84.0%
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (sin.f64 theta) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 delta phi1)))) #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))))
78.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
91.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.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)))) (/.f64 #s(literal 1 binary64) (fma.f64 (-.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 delta delta)))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))))) (cos.f64 delta))))
78.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (pow (sin phi1) 2) (cos delta))) (cos delta)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))
88.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (pow (sin phi1) 2) (cos delta))) (cos delta)) (cos.f64 delta)))))
78.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (sin.f64 phi1) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)))) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta))) (pow.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)))))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
91.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)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
83.7%
(+.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 (sin.f64 phi1) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
77.6%
(+.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 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) #s(literal 1 binary64)))))
93.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))))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))))
77.6%
(+.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))))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
39.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))))))) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))
63.0%
(+.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 (fma.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (neg.f64 (pow.f64 (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)) #s(literal 2 binary64)))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)))))))
63.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))))))) (/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
77.6%
(+.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 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
77.6%
(+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
77.5%
(+.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 #s(literal 1 binary64) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))))))
73.0%
(+.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 #s(literal 1 binary64) #s(approx (pow (sin phi1) 2) (*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/315 binary64) phi1) phi1 #s(literal 2/45 binary64)) phi1) phi1 #s(literal -1/3 binary64)) phi1) phi1 #s(literal 1 binary64)) phi1) phi1))))))
68.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))))))) (-.f64 #s(literal 1 binary64) #s(approx (pow (sin phi1) 2) (*.f64 phi1 phi1))))))
77.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))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) delta (cos.f64 phi1))))))
87.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))))))) (cos.f64 delta))))
68.3%
(+.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 (- 1 (pow (sin phi1) 2)) (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2/45 binary64) phi1) phi1 #s(literal 1/3 binary64)) phi1) phi1 #s(literal -1 binary64)) phi1) phi1 #s(literal 1 binary64))))))
72.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 (- 1 (pow (sin phi1) 2)) (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) phi1) phi1 #s(literal -1 binary64)) phi1) phi1 #s(literal 1 binary64))))))
74.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 (- 1 (pow (sin phi1) 2)) #s(literal 1 binary64)))))
73.7%
(+.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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
72.1%
(+.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))))))) (cos.f64 delta))))
65.2%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
73.2%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) 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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
74.4%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) 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))))
68.3%
(+.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 1/2 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
71.3%
(+.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)) #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)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (cos.f64 phi1))) delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
74.0%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))))
65.2%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
64.4%
(+.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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
71.1%
(+.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))))))) (cos.f64 delta))))
86.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.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 (sin.f64 delta) (cos.f64 theta)))))))))
75.8%
(+.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))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
87.5%
(+.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))))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))))
83.9%
(+.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))))))) (fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (cos.f64 delta)))))
73.8%
(+.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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
86.4%
(+.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))))
68.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) 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))))
71.3%
(+.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))))
64.1%
(+.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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
70.1%
(+.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))))
62.2%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) #s(approx (* (sin delta) theta) (*.f64 (fma.f64 (*.f64 (*.f64 theta (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) delta) delta theta) delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
61.7%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) #s(approx (* (sin delta) theta) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) theta) delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
62.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) #s(approx (* (sin delta) theta) (*.f64 theta delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
43.2%
(*.f64 (fma.f64 (*.f64 lambda1 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 3 binary64))) (/.f64 #s(literal 1 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))))
57.4%
(*.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 #s(literal 1 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))))))
35.1%
#s(approx (/ (- (pow (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (+ (* (* (cos phi1) (cos theta)) (sin delta)) (* (cos delta) (sin phi1))) (sin phi1)))) 2) (* lambda1 lambda1)) (- (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (+ (* (* (cos phi1) (cos theta)) (sin delta)) (* (cos delta) (sin phi1))) (sin phi1)))) lambda1)) (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
99.6%
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* -1/2 (cos (+ phi1 phi1))) 1/2) (neg (cos delta))) (+ (* (sin delta) (* (* (cos phi1) (cos theta)) (neg (sin phi1)))) (cos delta))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1) lambda1 lambda1))
35.2%
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (* (sin delta) (cos phi1))) (cos theta)) (* (+ (neg (+ (* -1/2 (cos (+ phi1 phi1))) 1/2)) 1) (cos delta))))) (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))
Compiler

Compiled 7 714 to 2 181 computations (71.7% saved)

regimes308.0ms (1.7%)

Memory
28.4MiB live, 453.6MiB allocated
Counts
130 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) #s(approx (* (sin delta) theta) (*.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)) #s(approx (* (sin delta) theta) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) 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)) #s(approx (* (sin delta) theta) (*.f64 (fma.f64 (*.f64 (*.f64 theta (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) delta) delta 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 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 (*.f64 #s(literal -1/6 binary64) 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 (*.f64 #s(literal -1/6 binary64) 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)) (*.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)) #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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.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))))))) (cos.f64 delta))))
(+.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))))))) (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 (- 1 (pow (sin phi1) 2)) #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 1/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 (*.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 phi1) phi1) 1) (cos delta)) (* (neg phi1) (* (sin delta) (cos theta)))) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 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 #s(literal 1 binary64) #s(approx (pow (sin phi1) 2) (*.f64 phi1 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) 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 #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)) #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 (- 1 (pow (sin phi1) 2)) (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) phi1) 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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (- 1 (pow (sin phi1) 2)) (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2/45 binary64) phi1) phi1 #s(literal 1/3 binary64)) phi1) 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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) #s(approx (pow (sin phi1) 2) (*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/315 binary64) phi1) phi1 #s(literal 2/45 binary64)) phi1) phi1 #s(literal -1/3 binary64)) phi1) phi1 #s(literal 1 binary64)) phi1) 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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.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))))))) (cos.f64 delta))))
(+.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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) 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 phi1) phi1) 1) (cos delta)) (* (neg phi1) (* (sin delta) (cos theta)))) (*.f64 (neg.f64 phi1) (*.f64 phi1 (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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (sin.f64 theta) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 delta phi1)))) #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 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (cos.f64 phi1))) delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) 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 #s(approx (* (sin theta) (sin delta)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 theta) (*.f64 (*.f64 (*.f64 delta delta) (*.f64 delta delta)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))))) 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))))))) (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #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))))))) (fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 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))))))) (fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) #s(literal 1 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))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) 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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (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))))))) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 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))))))) (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 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) #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 (* (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 (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (*.f64 (sin.f64 delta) 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))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (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))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) delta (cos.f64 phi1))))))
(+.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 (cos.f64 delta) phi1 (*.f64 (sin.f64 delta) (cos.f64 theta))) phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (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 #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (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))))))) (/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.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 (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))))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.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 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (pow (sin phi1) 2) (cos delta))) (cos 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 (sin.f64 phi1) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
(/.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 (-.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 #s(literal 1 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 (atan2.f64 (*.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) #s(approx (* (* (cos phi1) (cos theta)) (neg (sin phi1))) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1)))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (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)) (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (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)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.f64 (atan2.f64 #s(approx (* (* (sin delta) (cos phi1)) (sin theta)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.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)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.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 (sin.f64 delta) (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))))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.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 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (pow (sin phi1) 2) (cos delta))) (cos delta)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (* (sin delta) (cos phi1))) (cos theta)) (* (+ (neg (+ (* -1/2 (cos (+ phi1 phi1))) 1/2)) 1) (cos delta))))) (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 #s(approx (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(+.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 (sin.f64 phi1) (fma.f64 (fma.f64 (*.f64 theta theta) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal -1/2 binary64)) (cos.f64 delta)))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))))
(+.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)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
#s(approx (/ (- (pow (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (+ (* (* (cos phi1) (cos theta)) (sin delta)) (* (cos delta) (sin phi1))) (sin phi1)))) 2) (* lambda1 lambda1)) (- (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (+ (* (* (cos phi1) (cos theta)) (sin delta)) (* (cos delta) (sin phi1))) (sin phi1)))) lambda1)) (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.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)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* -1/2 (cos (+ phi1 phi1))) 1/2) (neg (cos delta))) (+ (* (sin delta) (* (* (cos phi1) (cos theta)) (neg (sin phi1)))) (cos delta))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))) lambda1) 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 (fma.f64 (*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (neg.f64 (pow.f64 (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)) #s(literal 2 binary64)))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 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)) (fma.f64 #s(approx (* (neg (sin phi1)) (sin phi1)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (sin.f64 delta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (sin.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (sin.f64 phi1) (fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 (*.f64 #s(literal -1/6 binary64) delta) delta (fma.f64 (*.f64 delta delta) (*.f64 (*.f64 delta delta) #s(literal 1/120 binary64)) #s(literal 1 binary64)))) 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 (fma.f64 (*.f64 lambda1 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 3 binary64))) (/.f64 #s(literal 1 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 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (cos.f64 delta)))))
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (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) (*.f64 lambda1 lambda1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (-.f64 (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 #s(approx (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (+ (* (* (cos phi1) (cos theta)) (sin delta)) (* (cos delta) (sin phi1))) (sin phi1)))) (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)))
(/.f64 (-.f64 (pow.f64 (pow.f64 (sqrt.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.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) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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)) (fma.f64 (*.f64 (neg.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)))) (/.f64 #s(literal 1 binary64) (fma.f64 (-.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 delta delta)))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)))) 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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1)) (*.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) #s(literal 2 binary64)))))
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (fma.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)))) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta))) (pow.f64 (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) (*.f64 (+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (cos.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) (*.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)))) (*.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (cos.f64 delta))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (cos.f64 delta))))) (*.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))))
Outputs
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
Calls

7 calls:

64.0ms
delta
50.0ms
theta
41.0ms
lambda1
40.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)))))))))
38.0ms
phi2
Results
AccuracySegmentsBranch
99.8%1lambda1
99.8%1phi1
99.8%1phi2
99.8%1delta
99.8%1theta
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%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))))))))
Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes204.0ms (1.2%)

Memory
10.9MiB live, 282.0MiB allocated
Counts
86 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) #s(approx (* (sin delta) theta) (*.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)) #s(approx (* (sin delta) theta) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) 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)) #s(approx (* (sin delta) theta) (*.f64 (fma.f64 (*.f64 (*.f64 theta (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) delta) delta 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 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 (*.f64 #s(literal -1/6 binary64) 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 (*.f64 #s(literal -1/6 binary64) 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)) (*.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)) #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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.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))))))) (cos.f64 delta))))
(+.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))))))) (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 (- 1 (pow (sin phi1) 2)) #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 1/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 (*.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 phi1) phi1) 1) (cos delta)) (* (neg phi1) (* (sin delta) (cos theta)))) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 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 #s(literal 1 binary64) #s(approx (pow (sin phi1) 2) (*.f64 phi1 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) 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 #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)) #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 (- 1 (pow (sin phi1) 2)) (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) phi1) 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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (- 1 (pow (sin phi1) 2)) (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2/45 binary64) phi1) phi1 #s(literal 1/3 binary64)) phi1) 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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) #s(approx (pow (sin phi1) 2) (*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/315 binary64) phi1) phi1 #s(literal 2/45 binary64)) phi1) phi1 #s(literal -1/3 binary64)) phi1) phi1 #s(literal 1 binary64)) phi1) 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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.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))))))) (cos.f64 delta))))
(+.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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) 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 phi1) phi1) 1) (cos delta)) (* (neg phi1) (* (sin delta) (cos theta)))) (*.f64 (neg.f64 phi1) (*.f64 phi1 (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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (sin.f64 theta) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 delta phi1)))) #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 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (cos.f64 phi1))) delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) 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 #s(approx (* (sin theta) (sin delta)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 theta) (*.f64 (*.f64 (*.f64 delta delta) (*.f64 delta delta)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))))) 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))))))) (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #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))))))) (fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 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))))))) (fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) #s(literal 1 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))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) 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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (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))))))) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 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))))))) (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 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) #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 (* (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 (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (*.f64 (sin.f64 delta) 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))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (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))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) delta (cos.f64 phi1))))))
(+.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 (cos.f64 delta) phi1 (*.f64 (sin.f64 delta) (cos.f64 theta))) phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (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 #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (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))))))) (/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.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 (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))))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.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 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (pow (sin phi1) 2) (cos delta))) (cos 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 (sin.f64 phi1) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
(/.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 (-.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 #s(literal 1 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 (atan2.f64 (*.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) #s(approx (* (* (cos phi1) (cos theta)) (neg (sin phi1))) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1)))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (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)) (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (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)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.f64 (atan2.f64 #s(approx (* (* (sin delta) (cos phi1)) (sin theta)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.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)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.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 (sin.f64 delta) (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))))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.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 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (pow (sin phi1) 2) (cos delta))) (cos delta)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (* (sin delta) (cos phi1))) (cos theta)) (* (+ (neg (+ (* -1/2 (cos (+ phi1 phi1))) 1/2)) 1) (cos delta))))) (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 #s(approx (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(+.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 (sin.f64 phi1) (fma.f64 (fma.f64 (*.f64 theta theta) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal -1/2 binary64)) (cos.f64 delta)))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))))
(+.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)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
#s(approx (/ (- (pow (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (+ (* (* (cos phi1) (cos theta)) (sin delta)) (* (cos delta) (sin phi1))) (sin phi1)))) 2) (* lambda1 lambda1)) (- (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (+ (* (* (cos phi1) (cos theta)) (sin delta)) (* (cos delta) (sin phi1))) (sin phi1)))) lambda1)) (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
Outputs
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
Calls

7 calls:

38.0ms
theta
37.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)))))))))
28.0ms
lambda1
25.0ms
phi2
24.0ms
delta
Results
AccuracySegmentsBranch
99.8%1lambda1
99.8%1phi1
99.8%1phi2
99.8%1delta
99.8%1theta
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%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))))))))
Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes214.0ms (1.2%)

Memory
12.5MiB live, 290.6MiB allocated
Counts
75 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) #s(approx (* (sin delta) theta) (*.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)) #s(approx (* (sin delta) theta) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) 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)) #s(approx (* (sin delta) theta) (*.f64 (fma.f64 (*.f64 (*.f64 theta (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) delta) delta 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 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 (*.f64 #s(literal -1/6 binary64) 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 (*.f64 #s(literal -1/6 binary64) 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)) (*.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)) #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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.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))))))) (cos.f64 delta))))
(+.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))))))) (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 (- 1 (pow (sin phi1) 2)) #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 1/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 (*.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 phi1) phi1) 1) (cos delta)) (* (neg phi1) (* (sin delta) (cos theta)))) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 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 #s(literal 1 binary64) #s(approx (pow (sin phi1) 2) (*.f64 phi1 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) 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 #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)) #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 (- 1 (pow (sin phi1) 2)) (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) phi1) 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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (- 1 (pow (sin phi1) 2)) (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2/45 binary64) phi1) phi1 #s(literal 1/3 binary64)) phi1) 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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) #s(approx (pow (sin phi1) 2) (*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/315 binary64) phi1) phi1 #s(literal 2/45 binary64)) phi1) phi1 #s(literal -1/3 binary64)) phi1) phi1 #s(literal 1 binary64)) phi1) 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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.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))))))) (cos.f64 delta))))
(+.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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) 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 phi1) phi1) 1) (cos delta)) (* (neg phi1) (* (sin delta) (cos theta)))) (*.f64 (neg.f64 phi1) (*.f64 phi1 (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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (sin.f64 theta) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 delta phi1)))) #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 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (cos.f64 phi1))) delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) 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 #s(approx (* (sin theta) (sin delta)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 theta) (*.f64 (*.f64 (*.f64 delta delta) (*.f64 delta delta)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))))) 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))))))) (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #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))))))) (fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 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))))))) (fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) #s(literal 1 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))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) 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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (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))))))) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 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))))))) (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 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) #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 (* (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 (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (*.f64 (sin.f64 delta) 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))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (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))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) delta (cos.f64 phi1))))))
(+.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 (cos.f64 delta) phi1 (*.f64 (sin.f64 delta) (cos.f64 theta))) phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (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 #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (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))))))) (/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.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 (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))))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.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 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (pow (sin phi1) 2) (cos delta))) (cos 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 (sin.f64 phi1) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
(/.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 (-.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 #s(literal 1 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 (atan2.f64 (*.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) #s(approx (* (* (cos phi1) (cos theta)) (neg (sin phi1))) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1)))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (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)) (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (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)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.f64 (atan2.f64 #s(approx (* (* (sin delta) (cos phi1)) (sin theta)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.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)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.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 (sin.f64 delta) (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))))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.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 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (pow (sin phi1) 2) (cos delta))) (cos delta)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (* (sin delta) (cos phi1))) (cos theta)) (* (+ (neg (+ (* -1/2 (cos (+ phi1 phi1))) 1/2)) 1) (cos delta))))) (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 #s(approx (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
Calls

7 calls:

54.0ms
delta
39.0ms
theta
33.0ms
phi1
23.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
phi2
Results
AccuracySegmentsBranch
99.7%1delta
99.7%1lambda1
99.7%1phi1
99.7%1phi2
99.7%1theta
99.7%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.7%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))))))))
Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes167.0ms (0.9%)

Memory
-12.6MiB live, 292.0MiB allocated
Counts
73 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) #s(approx (* (sin delta) theta) (*.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)) #s(approx (* (sin delta) theta) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) 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)) #s(approx (* (sin delta) theta) (*.f64 (fma.f64 (*.f64 (*.f64 theta (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) delta) delta 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 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 (*.f64 #s(literal -1/6 binary64) 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 (*.f64 #s(literal -1/6 binary64) 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)) (*.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)) #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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.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))))))) (cos.f64 delta))))
(+.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))))))) (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 (- 1 (pow (sin phi1) 2)) #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 1/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 (*.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 phi1) phi1) 1) (cos delta)) (* (neg phi1) (* (sin delta) (cos theta)))) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 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 #s(literal 1 binary64) #s(approx (pow (sin phi1) 2) (*.f64 phi1 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) 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 #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)) #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 (- 1 (pow (sin phi1) 2)) (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) phi1) 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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (- 1 (pow (sin phi1) 2)) (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2/45 binary64) phi1) phi1 #s(literal 1/3 binary64)) phi1) 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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) #s(approx (pow (sin phi1) 2) (*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/315 binary64) phi1) phi1 #s(literal 2/45 binary64)) phi1) phi1 #s(literal -1/3 binary64)) phi1) phi1 #s(literal 1 binary64)) phi1) 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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.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))))))) (cos.f64 delta))))
(+.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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) 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 phi1) phi1) 1) (cos delta)) (* (neg phi1) (* (sin delta) (cos theta)))) (*.f64 (neg.f64 phi1) (*.f64 phi1 (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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (sin.f64 theta) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 delta phi1)))) #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 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (cos.f64 phi1))) delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) 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 #s(approx (* (sin theta) (sin delta)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 theta) (*.f64 (*.f64 (*.f64 delta delta) (*.f64 delta delta)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))))) 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))))))) (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #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))))))) (fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 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))))))) (fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) #s(literal 1 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))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) 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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (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))))))) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 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))))))) (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 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) #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 (* (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 (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (*.f64 (sin.f64 delta) 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))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (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))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) delta (cos.f64 phi1))))))
(+.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 (cos.f64 delta) phi1 (*.f64 (sin.f64 delta) (cos.f64 theta))) phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (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 #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (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))))))) (/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.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 (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))))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.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 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (pow (sin phi1) 2) (cos delta))) (cos 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 (sin.f64 phi1) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
(/.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 (-.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 #s(literal 1 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 (atan2.f64 (*.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) #s(approx (* (* (cos phi1) (cos theta)) (neg (sin phi1))) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1)))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (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)) (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (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)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.f64 (atan2.f64 #s(approx (* (* (sin delta) (cos phi1)) (sin theta)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.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)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.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 (sin.f64 delta) (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))))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.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 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (pow (sin phi1) 2) (cos delta))) (cos delta)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (* (sin delta) (cos phi1))) (cos theta)) (* (+ (neg (+ (* -1/2 (cos (+ phi1 phi1))) 1/2)) 1) (cos delta))))) (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 #s(approx (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 delta)))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))))
Calls

7 calls:

32.0ms
lambda1
25.0ms
delta
23.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))))))))
21.0ms
phi2
21.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.7%1lambda1
99.7%1phi1
99.7%1phi2
99.7%1delta
99.7%1theta
99.7%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.7%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))))))))
Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes185.0ms (1%)

Memory
1.2MiB live, 259.3MiB allocated
Counts
71 → 3
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) #s(approx (* (sin delta) theta) (*.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)) #s(approx (* (sin delta) theta) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) 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)) #s(approx (* (sin delta) theta) (*.f64 (fma.f64 (*.f64 (*.f64 theta (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) delta) delta 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 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 (*.f64 #s(literal -1/6 binary64) 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 (*.f64 #s(literal -1/6 binary64) 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)) (*.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)) #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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.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))))))) (cos.f64 delta))))
(+.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))))))) (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 (- 1 (pow (sin phi1) 2)) #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 1/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 (*.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 phi1) phi1) 1) (cos delta)) (* (neg phi1) (* (sin delta) (cos theta)))) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 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 #s(literal 1 binary64) #s(approx (pow (sin phi1) 2) (*.f64 phi1 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) 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 #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)) #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 (- 1 (pow (sin phi1) 2)) (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) phi1) 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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (- 1 (pow (sin phi1) 2)) (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2/45 binary64) phi1) phi1 #s(literal 1/3 binary64)) phi1) 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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) #s(approx (pow (sin phi1) 2) (*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/315 binary64) phi1) phi1 #s(literal 2/45 binary64)) phi1) phi1 #s(literal -1/3 binary64)) phi1) phi1 #s(literal 1 binary64)) phi1) 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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.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))))))) (cos.f64 delta))))
(+.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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) 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 phi1) phi1) 1) (cos delta)) (* (neg phi1) (* (sin delta) (cos theta)))) (*.f64 (neg.f64 phi1) (*.f64 phi1 (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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (sin.f64 theta) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 delta phi1)))) #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 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (cos.f64 phi1))) delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) 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 #s(approx (* (sin theta) (sin delta)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 theta) (*.f64 (*.f64 (*.f64 delta delta) (*.f64 delta delta)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))))) 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))))))) (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #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))))))) (fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 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))))))) (fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) #s(literal 1 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))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) 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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (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))))))) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 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))))))) (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 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) #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 (* (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 (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (*.f64 (sin.f64 delta) 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))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (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))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) delta (cos.f64 phi1))))))
(+.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 (cos.f64 delta) phi1 (*.f64 (sin.f64 delta) (cos.f64 theta))) phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (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 #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (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))))))) (/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.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 (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))))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.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 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (pow (sin phi1) 2) (cos delta))) (cos 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 (sin.f64 phi1) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
(/.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 (-.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 #s(literal 1 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 (atan2.f64 (*.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) #s(approx (* (* (cos phi1) (cos theta)) (neg (sin phi1))) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1)))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (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)) (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (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)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.f64 (atan2.f64 #s(approx (* (* (sin delta) (cos phi1)) (sin theta)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.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)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.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 (sin.f64 delta) (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))))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.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 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (pow (sin phi1) 2) (cos delta))) (cos delta)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (* (sin delta) (cos phi1))) (cos theta)) (* (+ (neg (+ (* -1/2 (cos (+ phi1 phi1))) 1/2)) 1) (cos delta))))) (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))
Outputs
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) #s(approx (* (* (cos phi1) (cos theta)) (neg (sin phi1))) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (* (sin delta) (cos phi1))) (cos theta)) (* (+ (neg (+ (* -1/2 (cos (+ phi1 phi1))) 1/2)) 1) (cos delta))))) (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.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))))
Calls

7 calls:

45.0ms
phi1
36.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)))))))))
21.0ms
delta
21.0ms
theta
21.0ms
phi2
Results
AccuracySegmentsBranch
93.9%1lambda1
93.9%1phi1
93.9%1phi2
93.9%1delta
93.9%1theta
97.1%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.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))))))))
Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes43.0ms (0.2%)

Memory
19.4MiB live, 92.2MiB allocated
Counts
70 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) #s(approx (* (sin delta) theta) (*.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)) #s(approx (* (sin delta) theta) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) 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)) #s(approx (* (sin delta) theta) (*.f64 (fma.f64 (*.f64 (*.f64 theta (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) delta) delta 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 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 (*.f64 #s(literal -1/6 binary64) 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 (*.f64 #s(literal -1/6 binary64) 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)) (*.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)) #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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.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))))))) (cos.f64 delta))))
(+.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))))))) (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 (- 1 (pow (sin phi1) 2)) #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 1/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 (*.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 phi1) phi1) 1) (cos delta)) (* (neg phi1) (* (sin delta) (cos theta)))) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 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 #s(literal 1 binary64) #s(approx (pow (sin phi1) 2) (*.f64 phi1 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) 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 #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)) #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 (- 1 (pow (sin phi1) 2)) (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) phi1) 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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (- 1 (pow (sin phi1) 2)) (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2/45 binary64) phi1) phi1 #s(literal 1/3 binary64)) phi1) 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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) #s(approx (pow (sin phi1) 2) (*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/315 binary64) phi1) phi1 #s(literal 2/45 binary64)) phi1) phi1 #s(literal -1/3 binary64)) phi1) phi1 #s(literal 1 binary64)) phi1) 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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.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))))))) (cos.f64 delta))))
(+.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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) 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 phi1) phi1) 1) (cos delta)) (* (neg phi1) (* (sin delta) (cos theta)))) (*.f64 (neg.f64 phi1) (*.f64 phi1 (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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (sin.f64 theta) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 delta phi1)))) #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 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (cos.f64 phi1))) delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) 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 #s(approx (* (sin theta) (sin delta)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 theta) (*.f64 (*.f64 (*.f64 delta delta) (*.f64 delta delta)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))))) 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))))))) (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #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))))))) (fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 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))))))) (fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) #s(literal 1 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))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) 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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (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))))))) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 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))))))) (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 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) #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 (* (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 (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (*.f64 (sin.f64 delta) 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))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (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))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) delta (cos.f64 phi1))))))
(+.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 (cos.f64 delta) phi1 (*.f64 (sin.f64 delta) (cos.f64 theta))) phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (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 #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (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))))))) (/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.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 (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))))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.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 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (pow (sin phi1) 2) (cos delta))) (cos 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 (sin.f64 phi1) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
(/.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 (-.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 #s(literal 1 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 (atan2.f64 (*.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) #s(approx (* (* (cos phi1) (cos theta)) (neg (sin phi1))) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1)))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (cos.f64 phi1) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (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)) (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (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)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.f64 (atan2.f64 #s(approx (* (* (sin delta) (cos phi1)) (sin theta)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.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)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.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 (sin.f64 delta) (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))))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.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 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (pow (sin phi1) 2) (cos delta))) (cos delta)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))
Outputs
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) #s(approx (* (* (cos phi1) (cos theta)) (neg (sin phi1))) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1)))))) lambda1)
Calls

2 calls:

20.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)))))))))
20.0ms
phi1
Results
AccuracySegmentsBranch
93.9%1phi1
93.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)))))))))
Compiler

Compiled 44 to 28 computations (36.4% saved)

regimes122.0ms (0.7%)

Memory
-13.6MiB live, 262.9MiB allocated
Counts
57 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) #s(approx (* (sin delta) theta) (*.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)) #s(approx (* (sin delta) theta) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) 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)) #s(approx (* (sin delta) theta) (*.f64 (fma.f64 (*.f64 (*.f64 theta (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) delta) delta 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 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 (*.f64 #s(literal -1/6 binary64) 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 (*.f64 #s(literal -1/6 binary64) 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)) (*.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)) #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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.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))))))) (cos.f64 delta))))
(+.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))))))) (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 (- 1 (pow (sin phi1) 2)) #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 1/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 (*.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 phi1) phi1) 1) (cos delta)) (* (neg phi1) (* (sin delta) (cos theta)))) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 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 #s(literal 1 binary64) #s(approx (pow (sin phi1) 2) (*.f64 phi1 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) 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 #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)) #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 (- 1 (pow (sin phi1) 2)) (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) phi1) 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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (- 1 (pow (sin phi1) 2)) (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2/45 binary64) phi1) phi1 #s(literal 1/3 binary64)) phi1) 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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) #s(approx (pow (sin phi1) 2) (*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/315 binary64) phi1) phi1 #s(literal 2/45 binary64)) phi1) phi1 #s(literal -1/3 binary64)) phi1) phi1 #s(literal 1 binary64)) phi1) 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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.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))))))) (cos.f64 delta))))
(+.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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) 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 phi1) phi1) 1) (cos delta)) (* (neg phi1) (* (sin delta) (cos theta)))) (*.f64 (neg.f64 phi1) (*.f64 phi1 (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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (sin.f64 theta) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 delta phi1)))) #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 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (cos.f64 phi1))) delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) 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 #s(approx (* (sin theta) (sin delta)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 theta) (*.f64 (*.f64 (*.f64 delta delta) (*.f64 delta delta)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))))) 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))))))) (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #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))))))) (fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 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))))))) (fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) #s(literal 1 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))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) 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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (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))))))) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 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))))))) (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 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) #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 (* (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 (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (*.f64 (sin.f64 delta) 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))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (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))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) delta (cos.f64 phi1))))))
(+.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 (cos.f64 delta) phi1 (*.f64 (sin.f64 delta) (cos.f64 theta))) phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (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 #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (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))))))) (/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.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 (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))))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.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 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) #s(approx (+ (neg (* (pow (sin phi1) 2) (cos delta))) (cos 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 (sin.f64 phi1) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
(/.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 (-.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 #s(literal 1 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 (atan2.f64 (*.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
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:

20.0ms
phi1
18.0ms
delta
17.0ms
theta
16.0ms
lambda1
16.0ms
phi2
Results
AccuracySegmentsBranch
91.1%1phi2
91.1%1lambda1
91.1%1delta
91.1%1theta
91.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)))))))))
91.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))))))))
91.1%1phi1
Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes226.0ms (1.3%)

Memory
10.0MiB live, 167.0MiB allocated
Counts
39 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) #s(approx (* (sin delta) theta) (*.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)) #s(approx (* (sin delta) theta) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) 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)) #s(approx (* (sin delta) theta) (*.f64 (fma.f64 (*.f64 (*.f64 theta (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) delta) delta 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 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 (*.f64 #s(literal -1/6 binary64) 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 (*.f64 #s(literal -1/6 binary64) 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)) (*.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)) #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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.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))))))) (cos.f64 delta))))
(+.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))))))) (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 (- 1 (pow (sin phi1) 2)) #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 1/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 (*.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 phi1) phi1) 1) (cos delta)) (* (neg phi1) (* (sin delta) (cos theta)))) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 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 #s(literal 1 binary64) #s(approx (pow (sin phi1) 2) (*.f64 phi1 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) 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 #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)) #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 (- 1 (pow (sin phi1) 2)) (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) phi1) 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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (- 1 (pow (sin phi1) 2)) (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2/45 binary64) phi1) phi1 #s(literal 1/3 binary64)) phi1) 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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) #s(approx (pow (sin phi1) 2) (*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/315 binary64) phi1) phi1 #s(literal 2/45 binary64)) phi1) phi1 #s(literal -1/3 binary64)) phi1) phi1 #s(literal 1 binary64)) phi1) 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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.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))))))) (cos.f64 delta))))
(+.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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) 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 phi1) phi1) 1) (cos delta)) (* (neg phi1) (* (sin delta) (cos theta)))) (*.f64 (neg.f64 phi1) (*.f64 phi1 (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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (sin.f64 theta) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 delta phi1)))) #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 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (cos.f64 phi1))) delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) 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 #s(approx (* (sin theta) (sin delta)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 theta) (*.f64 (*.f64 (*.f64 delta delta) (*.f64 delta delta)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))))) 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))))))) (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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #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))))))) (fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 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))))))) (fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) #s(literal 1 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))))))) (fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) 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 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (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))))))) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 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))))))) (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 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))))
Calls

7 calls:

148.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)))))))))
19.0ms
delta
12.0ms
lambda1
12.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))))))))
11.0ms
theta
Results
AccuracySegmentsBranch
87.9%1phi1
87.9%1lambda1
87.9%1delta
87.9%1phi2
87.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)))))))))
87.9%1theta
87.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))))))))
Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes103.0ms (0.6%)

Memory
-12.2MiB live, 72.0MiB allocated
Counts
21 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) #s(approx (* (sin delta) theta) (*.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)) #s(approx (* (sin delta) theta) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) 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)) #s(approx (* (sin delta) theta) (*.f64 (fma.f64 (*.f64 (*.f64 theta (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) delta) delta 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 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 (*.f64 #s(literal -1/6 binary64) 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 (*.f64 #s(literal -1/6 binary64) 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)) (*.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)) #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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.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))))))) (cos.f64 delta))))
(+.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))))))) (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 (- 1 (pow (sin phi1) 2)) #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 1/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 (*.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 phi1) phi1) 1) (cos delta)) (* (neg phi1) (* (sin delta) (cos theta)))) (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 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 #s(literal 1 binary64) #s(approx (pow (sin phi1) 2) (*.f64 phi1 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) 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 #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)) #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 (- 1 (pow (sin phi1) 2)) (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) phi1) 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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (- 1 (pow (sin phi1) 2)) (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2/45 binary64) phi1) phi1 #s(literal 1/3 binary64)) phi1) 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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) #s(approx (pow (sin phi1) 2) (*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/315 binary64) phi1) phi1 #s(literal 2/45 binary64)) phi1) phi1 #s(literal -1/3 binary64)) phi1) phi1 #s(literal 1 binary64)) phi1) 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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
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:

42.0ms
phi1
27.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)))))))))
6.0ms
delta
6.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))))))))
6.0ms
lambda1
Results
AccuracySegmentsBranch
86.4%1theta
86.4%1lambda1
86.4%1phi1
86.4%1phi2
86.4%1delta
86.4%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)))))))))
86.4%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))))))))
Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes28.0ms (0.2%)

Memory
-8.0MiB live, 29.8MiB allocated
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)) #s(approx (* (sin delta) theta) (*.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)) #s(approx (* (sin delta) theta) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) 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)) #s(approx (* (sin delta) theta) (*.f64 (fma.f64 (*.f64 (*.f64 theta (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) delta) delta 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 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 (*.f64 #s(literal -1/6 binary64) 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 (*.f64 #s(literal -1/6 binary64) 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))))
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

7 calls:

9.0ms
lambda1
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))))))))
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
phi1
3.0ms
theta
Results
AccuracySegmentsBranch
72.9%2phi2
71.3%1lambda1
73.2%2phi1
79.2%3delta
79.1%3theta
74.1%2(+.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)))))))))
74.3%2(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 104 to 70 computations (32.7% saved)

regimes16.0ms (0.1%)

Memory
21.8MiB live, 21.8MiB allocated
Counts
4 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) #s(approx (* (sin delta) theta) (*.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)) #s(approx (* (sin delta) theta) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) 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)) #s(approx (* (sin delta) theta) (*.f64 (fma.f64 (*.f64 (*.f64 theta (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) delta) delta 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))))
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:

2.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)))))))))
2.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
lambda1
2.0ms
phi1
2.0ms
delta
Results
AccuracySegmentsBranch
70.1%1lambda1
70.1%1phi2
70.1%1phi1
70.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)))))))))
70.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))))))))
70.1%1theta
70.1%1delta
Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes28.0ms (0.2%)

Memory
13.4MiB live, 48.8MiB allocated
Accuracy

Total -2.0b remaining (-8.6%)

Threshold costs -2b (-8.6%)

Counts
3 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) #s(approx (* (sin delta) theta) (*.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)) #s(approx (* (sin delta) theta) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) 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)) #s(approx (* (sin delta) theta) (*.f64 (fma.f64 (*.f64 (*.f64 theta (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) delta) delta 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)) #s(approx (* (sin delta) theta) (*.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:

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)))))))))
2.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
lambda1
2.0ms
phi1
2.0ms
theta
Results
AccuracySegmentsBranch
62.8%1phi1
62.8%1lambda1
62.8%1phi2
62.8%1theta
62.8%1delta
62.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)))))))))
62.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))))))))
Compiler

Compiled 104 to 70 computations (32.7% saved)

bsearch32.0ms (0.2%)

Memory
-29.6MiB live, 3.0MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
3.141592653589793
2837120740531440.0
0.0ms
2.8367760391334365e-15
6.4637108858926296e-12
Compiler

Compiled 41 to 31 computations (24.4% saved)

bsearch156.0ms (0.9%)

Memory
41.5MiB live, 153.8MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
89.0ms
2.7865046402428742e+38
3.6500217036149334e+48
61.0ms
-2166120653340.3647
-56524869314.873055
Samples
114.0ms272×0valid
Compiler

Compiled 653 to 405 computations (38% saved)

Precisions
Click to see histograms. Total time spent on operations: 105.0ms
ival-cos: 45.0ms (43% of total)
ival-sin: 39.0ms (37.3% of total)
ival-mult: 9.0ms (8.6% of total)
ival-asin: 5.0ms (4.8% of total)
ival-atan2: 3.0ms (2.9% of total)
ival-add: 2.0ms (1.9% of total)
ival-sub: 1.0ms (1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

simplify30.0ms (0.2%)

Memory
-13.5MiB live, 25.4MiB allocated
Algorithm
egg-herbie
Rules
48×*-commutative_binary64
32×+-commutative_binary64
20×neg-sub0_binary64
20×neg-mul-1_binary64
19×sub-neg_binary64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0146761
1211761
2259761
3313761
4339761
5349761
6351761
Stop Event
saturated
Calls
Call 1
Inputs
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (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 6338253001141147/1267650600228229401496703205376 binary64)) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) #s(approx (* (* (cos phi1) (cos theta)) (neg (sin phi1))) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1)))))) lambda1) (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 5 binary64)) #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (* (sin delta) (cos phi1))) (cos theta)) (* (+ (neg (+ (* -1/2 (cos (+ phi1 phi1))) 1/2)) 1) (cos delta))))) (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.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 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) #s(approx (* (* (cos phi1) (cos theta)) (neg (sin phi1))) (*.f64 (neg.f64 (cos.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) #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)) #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 delta #s(literal -180000000000 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 280000000000000001252453878268327624704 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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) #s(approx (* (sin delta) theta) (*.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 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
(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 6338253001141147/1267650600228229401496703205376 binary64)) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) #s(approx (* (* (cos phi1) (cos theta)) (neg (sin phi1))) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1)))))) lambda1) (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 5 binary64)) #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (* (sin delta) (cos phi1))) (cos theta)) (* (+ (neg (+ (* -1/2 (cos (+ phi1 phi1))) 1/2)) 1) (cos delta))))) (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.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))))))
(if (<=.f64 (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (sin.f64 phi1)))) lambda1) #s(literal 6338253001141147/1267650600228229401496703205376 binary64)) (+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 #s(approx (* (* (cos phi1) (cos theta)) (neg (sin phi1))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1))) (sin.f64 delta)))) lambda1) (if (<=.f64 (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (sin.f64 phi1)))) lambda1) #s(literal 5 binary64)) #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (* (sin delta) (cos phi1))) (cos theta)) (* (+ (neg (+ (* -1/2 (cos (+ phi1 phi1))) 1/2)) 1) (cos delta))))) (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (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 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (neg.f64 (cos.f64 theta)))))) (+.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 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) #s(approx (* (* (cos phi1) (cos theta)) (neg (sin phi1))) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1)))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 #s(approx (* (* (cos phi1) (cos theta)) (neg (sin phi1))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1))) (sin.f64 delta)))) lambda1)
(+.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 (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))))) 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 (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 #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)
(if (<=.f64 delta #s(literal -180000000000 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 280000000000000001252453878268327624704 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 (<=.f64 delta #s(literal -180000000000 binary64)) (+.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) (if (<=.f64 delta #s(literal 280000000000000001252453878268327624704 binary64)) (+.f64 (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))) 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 (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 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)) #s(approx (* (sin delta) theta) (*.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 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) #s(approx (* (sin delta) theta) (*.f64 theta delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)

soundness1.7s (9.6%)

Memory
7.2MiB live, 1 273.3MiB allocated
Rules
9 047×lower-fma.f64
9 047×lower-fma.f32
8 127×lower-fma.f64
8 127×lower-fma.f32
7 289×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
076619
0125596
1466533
23264533
09439527
060121185
1213920373
2670920276
0807119297
022147
040139
1120139
2846139
08744133
073619
0124604
1446588
23409588
09353575
02815807
19765684
234235625
359955582
081625302
069656
0121606
1485564
23526564
08257564
059025555
1202723527
2713123464
0806622473
059220977
1207919192
2714919104
0814618327
Stop Event
fuel
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
iter limit
Compiler

Compiled 1 318 to 647 computations (50.9% saved)

preprocess115.0ms (0.6%)

Memory
25.3MiB live, 296.5MiB allocated
Remove

(abs phi2)

Compiler

Compiled 1 696 to 724 computations (57.3% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...