Destination given bearing on a great circle

Time bar (total: 18.5s)

analyze1.2s (6.5%)

Memory
-25.1MiB live, 1 289.8MiB 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)

sample3.0s (16%)

Memory
69.7MiB live, 2 574.6MiB allocated
Samples
2.5s8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 2.1s
ival-sin: 790.0ms (38.5% of total)
ival-cos: 550.0ms (26.8% of total)
ival-mult: 325.0ms (15.8% of total)
ival-asin: 172.0ms (8.4% of total)
ival-atan2: 90.0ms (4.4% of total)
ival-add: 78.0ms (3.8% of total)
ival-sub: 38.0ms (1.9% of total)
ival-true: 7.0ms (0.3% of total)
ival-assert: 3.0ms (0.1% of total)
Bogosity

preprocess264.0ms (1.4%)

Memory
-1.6MiB live, 74.1MiB allocated
Algorithm
egg-herbie
Rules
1 618×distribute-rgt-in
1 602×distribute-lft-in
1 294×distribute-lft-neg-in
1 050×sub-neg
794×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 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 (asin.f64 (fma.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
Symmetry

(abs phi2)

explain380.0ms (2.1%)

Memory
22.8MiB live, 373.3MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
70-1(3.8321310950964764e-79 1.4947028850286997e+88 1.7135090792762825e+218 -1.5790545458688393e+20 -4.902160913405183e+46)(-.f64 (cos.f64 delta) (*.f64 (sin.f64 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)
Confusion
Predicted +Predicted -
+01
-0255
Precision
0/0
Recall
0.0
Confusion?
Predicted +Predicted MaybePredicted -
+010
-01254
Precision?
0.5
Recall?
1.0
Freqs
test
numberfreq
0256
Total Confusion?
Predicted +Predicted MaybePredicted -
+010
-000
Precision?
1.0
Recall?
1.0
Samples
142.0ms512×0valid
Compiler

Compiled 474 to 96 computations (79.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 113.0ms
ival-sin: 39.0ms (34.6% of total)
ival-cos: 33.0ms (29.3% of total)
ival-mult: 18.0ms (16% of total)
ival-asin: 12.0ms (10.6% of total)
ival-add: 5.0ms (4.4% of total)
ival-atan2: 4.0ms (3.5% of total)
ival-sub: 2.0ms (1.8% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

eval0.0ms (0%)

Memory
0.3MiB live, 0.3MiB allocated
Compiler

Compiled 5 to 5 computations (0% saved)

prune1.0ms (0%)

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

Compiled 38 to 23 computations (39.5% saved)

simplify58.0ms (0.3%)

Memory
-2.8MiB live, 36.6MiB 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
640×lower-fma.f64
640×lower-fma.f32
496×lower-*.f32
484×lower-*.f64
244×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 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 (asin.f64 (fma.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 (asin.f64 (fma.f64 (sin.f64 delta) (*.f64 (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 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(fma.f64 (sin.f64 (asin.f64 (fma.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) (neg.f64 (sin.f64 phi1)) (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 phi1) (sin.f64 (asin.f64 (fma.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(cos.f64 theta)

localize121.0ms (0.7%)

Memory
-20.1MiB live, 94.4MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy99.7%
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy99.6%
(*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
accuracy99.5%
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
accuracy99.3%
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 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
71.0ms256×0valid
Compiler

Compiled 199 to 25 computations (87.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 53.0ms
ival-sin: 19.0ms (35.7% of total)
ival-cos: 16.0ms (30% of total)
ival-mult: 9.0ms (16.9% of total)
ival-asin: 4.0ms (7.5% of total)
ival-add: 2.0ms (3.8% of total)
ival-atan2: 2.0ms (3.8% of total)
ival-sub: 1.0ms (1.9% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series49.0ms (0.3%)

Memory
3.0MiB live, 43.3MiB 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)))

rewrite371.0ms (2%)

Memory
24.5MiB live, 369.2MiB allocated
Algorithm
batch-egg-rewrite
Rules
6 986×lower-fma.f64
6 986×lower-fma.f32
5 942×lower-*.f32
5 930×lower-*.f64
3 900×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 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))
(+.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))))
(+.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(+.f64 (/.f64 (*.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 #s(literal 2 binary64) phi1))))) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (neg.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(-.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))
(-.f64 (/.f64 (*.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 #s(literal 2 binary64) phi1))))) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (/.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(-.f64 (*.f64 (sin.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (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)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(sin.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #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 delta delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))
(fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #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 delta delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (neg.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))))
(fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))
(fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (neg.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))))
(fma.f64 (*.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 #s(literal 2 binary64) phi1))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (neg.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(fma.f64 (fma.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 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))
(fma.f64 (fma.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 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (neg.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(fma.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(fma.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))
(fma.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))))
(fma.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(fma.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #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 delta delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))) (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))
(fma.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #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 delta delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))) (neg.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #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 delta delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #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 delta delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (neg.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))))
(fma.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(fma.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (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)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))
(fma.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (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)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(neg.f64 (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64))) (fma.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 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 (fma.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 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (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)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64)))) (neg.f64 (fma.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 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 (neg.f64 (fma.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 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64))))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (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)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (+.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.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 #s(literal 2 binary64) phi1))))) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (*.f64 (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 9 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 9 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 6 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))) (fma.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 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64))) (fma.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 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #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 delta delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #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 delta delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(/.f64 (neg.f64 (neg.f64 (fma.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 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))))) (neg.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (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)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))) (neg.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (fma.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.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 #s(literal 2 binary64) phi1))))) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.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 #s(literal 2 binary64) phi1))))) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.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)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (/.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (*.f64 (/.f64 (*.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 #s(literal 2 binary64) phi1))))) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (/.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.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 #s(literal 2 binary64) phi1))))) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.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)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (/.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (+.f64 (/.f64 (*.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 #s(literal 2 binary64) phi1))))) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (/.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #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 delta delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(*.f64 (fma.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 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(*.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(*.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #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 delta delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(*.f64 (neg.f64 (fma.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 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (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)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (neg.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)))
(fma.f64 (*.f64 lambda1 lambda1) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (neg.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))))
(neg.f64 (/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))))
(neg.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))))
(neg.f64 (/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)))) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(neg.f64 (/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
(/.f64 (*.f64 (fma.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 9 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (fma.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64))) (pow.f64 (*.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (fma.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) lambda1 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64))) (pow.f64 (*.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (fma.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (*.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))) (*.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))) (+.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #s(literal -1 binary64))
(*.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
(*.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
(*.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))))
(*.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))))
(*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1))))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1))) #s(literal -2 binary64))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(*.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 1/2 binary64))
(+.f64 (cos.f64 delta) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1))))
(+.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))
(+.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))) (neg.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))) (neg.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.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)))
(+.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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (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 (+.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(+.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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1))))
(+.f64 (+.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (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) (*.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64)))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 delta)))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))
(-.f64 (+.f64 (cos.f64 delta) #s(literal 0 binary64)) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(-.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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(-.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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (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)))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (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 (sin.f64 phi1) (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 delta))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (neg.f64 (sin.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (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 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))) #s(literal -1/2 binary64) (cos.f64 delta))
(fma.f64 (pow.f64 (cos.f64 delta) #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 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))) (neg.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (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 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))) (neg.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.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)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))
(fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))) #s(literal 1/2 binary64) (cos.f64 delta))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 delta))
(fma.f64 (*.f64 (cos.f64 delta) (neg.f64 (sin.f64 phi1))) (sin.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 delta) (neg.f64 (sin.f64 phi1))) (sin.f64 phi1) (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #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 delta delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.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 delta delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 delta))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal -1 binary64)) (sin.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta)))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal -1 binary64)) (sin.f64 phi1) (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal -1 binary64)) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (*.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)))
(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)) (*.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)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (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 (sin.f64 delta) (cos.f64 theta))) (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 (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 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #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)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal 1/2 binary64) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(neg.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #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 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 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 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))) (neg.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))
(neg.f64 (/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 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 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1))) (-.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (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)))) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 1 binary64)))
(/.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 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1))) (-.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #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 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #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 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1))) (-.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (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 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (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 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))) (*.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))) (*.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))
(/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 9 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 9 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 6 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 4 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))
(/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #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 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (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 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (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)))) (*.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))) (fma.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))) (*.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (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 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (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 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))) (fma.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #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 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))))) (*.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))) (*.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal -1 binary64))
(*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #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 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))))
(*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #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 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1))) (-.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (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)))) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))
(*.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(*.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (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 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (*.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 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (*.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 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(-.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (*.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 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (+.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) (/.f64 (pow.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (fma.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (*.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (+.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(-.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 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (/.f64 (pow.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(fma.f64 #s(literal 1 binary64) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(fma.f64 (neg.f64 (PI.f64)) #s(literal -1/2 binary64) (neg.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (*.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (+.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (*.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 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (pow.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (*.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (+.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (*.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 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (*.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (+.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (pow.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64) (pow.f64 (neg.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (-.f64 (*.f64 (neg.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (neg.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))))
(/.f64 (-.f64 (pow.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (*.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 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64)))) (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (*.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 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (*.f64 (neg.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (neg.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 (-.f64 (*.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64)))) (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (*.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 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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))))
(asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #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 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (+.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (*.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 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(+.f64 (*.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #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) phi1)))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(+.f64 (*.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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))
(+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (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)))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (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 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) phi1)) #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(fma.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (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 delta)) (sin.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (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 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #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) phi1)))) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))
(fma.f64 (*.f64 (sin.f64 phi1) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(fma.f64 (*.f64 (sin.f64 phi1) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (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 theta)) (*.f64 (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 (sin.f64 delta) (cos.f64 theta))) (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 (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)))
(neg.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1))))
(/.f64 (sin.f64 phi1) (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) phi1)) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) phi1)) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.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 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (*.f64 (sin.f64 phi1) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (sin.f64 phi1) (fma.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 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #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 delta delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64))) (sin.f64 phi1))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (fma.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 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))) (sin.f64 phi1))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))) #s(literal -2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64)))) (neg.f64 (fma.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 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(/.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.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 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64))))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 (*.f64 (sin.f64 phi1) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64)))) (fma.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 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(/.f64 (*.f64 (sin.f64 phi1) (fma.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 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64))))) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #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)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(/.f64 (*.f64 (fma.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 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))) (sin.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) phi1)) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #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 delta delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(/.f64 (neg.f64 (*.f64 (fma.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 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))) (sin.f64 phi1))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (*.f64 (*.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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.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 phi1) (*.f64 (sin.f64 delta) (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))))))
(/.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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (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 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64))))))
(/.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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (*.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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (*.f64 (*.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 phi1) (*.f64 (sin.f64 delta) (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))))
(/.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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (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 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64))))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal -1 binary64))
(*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))) #s(literal 1/2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) phi1)) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))) #s(literal -1/2 binary64))
(*.f64 (*.f64 (sin.f64 phi1) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #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 delta delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(*.f64 (*.f64 (sin.f64 phi1) (fma.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 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(*.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #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 delta delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(*.f64 (*.f64 (fma.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 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))) (sin.f64 phi1)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(+.f64 (*.f64 (cos.f64 (-.f64 theta delta)) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (cos.f64 (-.f64 theta delta)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (-.f64 theta delta)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 binary64))))
(neg.f64 (/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal -2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(literal 1 binary64)))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal -2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta)))))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 delta theta)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal 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 delta theta)) #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 delta theta)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 theta delta)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 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 delta theta)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (-.f64 theta delta)) #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 binary64))))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(literal -1 binary64))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal -1/2 binary64))

simplify458.0ms (2.5%)

Memory
10.4MiB live, 439.1MiB allocated
Algorithm
egg-herbie
Rules
18 094×lower-fma.f64
18 094×lower-fma.f32
6 000×lower-*.f64
6 000×lower-*.f32
4 424×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 (cos.f64 theta) (sin.f64 delta))
(+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))
(fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 phi1 (cos.f64 delta)))
(+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))
(fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))
(+ (* 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 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))) (*.f64 phi1 (*.f64 phi1 (*.f64 (*.f64 phi1 (cos.f64 delta)) #s(literal -1/6 binary64)))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(sin phi1)
(sin.f64 phi1)
(+ (sin phi1) (* delta (* (cos phi1) (cos theta))))
(fma.f64 (cos.f64 theta) (*.f64 delta (cos.f64 phi1)) (sin.f64 phi1))
(+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))))
(fma.f64 (fma.f64 delta (*.f64 delta #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 delta (cos.f64 phi1))))
(+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta)))))
(fma.f64 delta (fma.f64 delta (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) (*.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 theta) (cos.f64 phi1)))) (sin.f64 phi1))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))
(fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(fma.f64 (sin.f64 delta) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) (fma.f64 (*.f64 theta theta) (*.f64 (*.f64 theta theta) #s(literal 1/24 binary64)) #s(literal 1 binary64))) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta)))))))))
(fma.f64 theta (*.f64 theta (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 (*.f64 theta theta) (fma.f64 (*.f64 theta theta) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(literal -1/2 binary64)))) (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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)))
(-.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
(* 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
(* 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
(* -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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
(* -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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (sin.f64 delta) (*.f64 theta (cos.f64 phi1)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 theta (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta)) 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 theta (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) (fma.f64 (*.f64 theta theta) (*.f64 (*.f64 theta theta) #s(literal 1/120 binary64)) #s(literal 1 binary64)))))
(* 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 theta (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 (*.f64 theta theta) (fma.f64 (*.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* delta (* (cos phi1) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 delta (sin.f64 theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 delta (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta)) 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 delta (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)) #s(literal 1 binary64)))))
(* 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 delta (fma.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 theta))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #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 phi1 phi1) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 (*.f64 phi1 phi1) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64)) #s(literal -1/2 binary64))) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.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 (cos.f64 phi1) (fma.f64 delta (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (*.f64 delta (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (*.f64 (cos.f64 phi1) (fma.f64 delta (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (*.f64 delta (fma.f64 (sin.f64 phi1) (fma.f64 (*.f64 delta #s(literal 1/6 binary64)) (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64))) #s(literal -1/2 binary64))) (*.f64 (cos.f64 phi1) (fma.f64 delta (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) phi1)))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 phi1 (cos.f64 delta))) (neg.f64 phi1) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (neg.f64 (fma.f64 phi1 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 #s(literal -2/3 binary64) phi1) (cos.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 delta)))) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(+.f64 (cos.f64 delta) (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (*.f64 theta theta) (*.f64 (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 (*.f64 theta theta) #s(literal -1/24 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (*.f64 theta theta) (*.f64 (*.f64 theta theta) (*.f64 (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 (*.f64 theta theta) #s(literal 1/720 binary64) #s(literal -1/24 binary64))))) (+.f64 (cos.f64 delta) (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) phi1))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(*.f64 phi1 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 phi1 (cos.f64 delta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(*.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 #s(literal -2/3 binary64) phi1) (cos.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 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))))
(*.f64 phi1 (fma.f64 phi1 (fma.f64 phi1 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) #s(literal -2/3 binary64)) (*.f64 (*.f64 phi1 (cos.f64 delta)) #s(literal -1/3 binary64))) (cos.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (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 (cos.f64 theta) (*.f64 delta (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 delta (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (*.f64 (fma.f64 delta (*.f64 delta #s(literal -1/2 binary64)) #s(literal 1 binary64)) (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 delta (fma.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (*.f64 delta (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (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 (sin.f64 delta) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (cos.f64 phi1)) (*.f64 (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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (+.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 theta theta) #s(literal 1/24 binary64)))) (*.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(+ (* (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 theta theta) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (*.f64 theta theta) (fma.f64 (*.f64 theta theta) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(literal -1/2 binary64))) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(*.f64 theta (*.f64 (sin.f64 delta) (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) (fma.f64 (*.f64 theta theta) (*.f64 (*.f64 theta theta) #s(literal 1/120 binary64)) #s(literal 1 binary64)))))
(* 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 theta (fma.f64 (*.f64 theta theta) (*.f64 (sin.f64 delta) (fma.f64 (*.f64 theta theta) (fma.f64 (*.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (sin.f64 delta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(*.f64 (sin.f64 theta) (fma.f64 delta (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta)) delta))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(*.f64 delta (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)) #s(literal 1 binary64)))))
(* 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 delta (fma.f64 (*.f64 delta delta) (*.f64 (sin.f64 theta) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (sin.f64 theta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))

eval125.0ms (0.7%)

Memory
22.6MiB live, 135.2MiB allocated
Compiler

Compiled 31 527 to 2 300 computations (92.7% saved)

prune433.0ms (2.3%)

Memory
-184.3MiB live, 145.2MiB allocated
Pruning

21 alts after pruning (21 fresh and 0 done)

PrunedKeptTotal
New60521626
Fresh000
Picked101
Done000
Total60621627
Accuracy
100.0%
Counts
627 → 21
Alt Table
Click to see full alt table
StatusAccuracyProgram
30.7%
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
51.7%
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
35.9%
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
44.9%
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
99.6%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
99.8%
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
99.8%
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta)))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 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%
(+.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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))))
99.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (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))))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))))
99.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))))
91.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (*.f64 (fma.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 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))) (sin.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))))
94.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
87.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 (cos.f64 theta) (sin.f64 delta))))))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))))))
84.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) phi1)))))
83.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
81.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (fma.f64 delta (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))
86.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
Compiler

Compiled 2 104 to 970 computations (53.9% saved)

simplify648.0ms (3.5%)

Memory
11.6MiB live, 561.0MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 (sin.f64 theta) (sin.f64 delta))
cost-diff0
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))))))
cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))))
cost-diff128
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))
cost-diff6464
(-.f64 (cos.f64 delta) (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))))
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 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
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 (cos.f64 theta) (sin.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)) (cos.f64 delta))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (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)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))))
cost-diff128
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))
cost-diff6464
(-.f64 (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))))
Rules
26 072×lower-fma.f32
26 066×lower-fma.f64
4 600×lower-*.f32
4 572×lower-*.f64
2 380×lower-+.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
051774
099774
1160774
2274774
3522774
41005762
52000762
62986762
73855762
85122762
95811762
106160762
116367762
126388762
136399762
08191750
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (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))))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (fma.f64 (*.f64 (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))))
(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)))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(sin.f64 phi1)
(*.f64 (cos.f64 phi1) (cos.f64 theta))
(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))
(-.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)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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
(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 (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.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
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))))
(cos.f64 delta)
(*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))
(sin.f64 phi1)
(sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))
(asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(*.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)) (-.f64 (cos.f64 delta) (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))))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (fma.f64 (*.f64 (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))))
(cos.f64 delta)
(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)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
(sin.f64 phi1)
(*.f64 (cos.f64 theta) (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))
(-.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)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))))
(cos.f64 delta)
(*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(sin.f64 phi1)
(sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(cos.f64 theta)
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.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) (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)))))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.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 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (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 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(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 (cos.f64 delta) (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(sin.f64 phi1)
(*.f64 (cos.f64 phi1) (cos.f64 theta))
(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))
(*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))
(fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #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 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))
(cos.f64 (*.f64 #s(literal 2 binary64) phi1))
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))
(*.f64 #s(literal 2 binary64) phi1)
(*.f64 phi1 #s(literal 2 binary64))
#s(literal 2 binary64)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.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 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(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 (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 (asin.f64 (*.f64 (sin.f64 delta) (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 (asin.f64 (*.f64 (sin.f64 delta) (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) (*.f64 (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 (cos.f64 theta) (sin.f64 delta))))))
(fma.f64 (sin.f64 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(cos.f64 delta)
(*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))
(*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(sin.f64 phi1)
(sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))
(sin.f64 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))))
(asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(*.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)) (-.f64 (cos.f64 delta) (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))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.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) (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)))))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.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 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (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 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(cos.f64 delta)
(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 (cos.f64 delta) (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(sin.f64 phi1)
(*.f64 (cos.f64 theta) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (cos.f64 theta))
(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))
(*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))
(fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #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 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))
(cos.f64 (*.f64 #s(literal 2 binary64) phi1))
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))
(*.f64 #s(literal 2 binary64) phi1)
(*.f64 phi1 #s(literal 2 binary64))
#s(literal 2 binary64)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 delta) (*.f64 (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 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (*.f64 (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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))))
(fma.f64 (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(cos.f64 delta)
(*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))))
(sin.f64 phi1)
(sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
(asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(cos.f64 (acos.f64 (fma.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(acos.f64 (fma.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(fma.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(cos.f64 theta)

localize525.0ms (2.8%)

Memory
17.8MiB live, 422.4MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy99.5%
(asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
accuracy99.4%
(acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
accuracy99.3%
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))))
accuracy73.8%
(cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
accuracy99.7%
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
accuracy99.7%
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy99.3%
(-.f64 (cos.f64 delta) (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))))
accuracy78.1%
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))
accuracy99.8%
(asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))
accuracy99.7%
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
accuracy99.7%
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy99.6%
(*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))
accuracy100.0%
(cos.f64 delta)
accuracy99.9%
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))
accuracy99.7%
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
accuracy99.7%
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy99.7%
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy99.7%
(*.f64 (sin.f64 phi1) (sin.f64 delta))
accuracy99.3%
(-.f64 (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))))
accuracy78.1%
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))
Samples
231.0ms123×1valid
86.0ms133×0valid
Compiler

Compiled 793 to 57 computations (92.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 231.0ms
ival-cos: 61.0ms (26.4% of total)
ival-sin: 43.0ms (18.6% of total)
ival-mult: 35.0ms (15.1% of total)
ival-sub: 29.0ms (12.5% of total)
adjust: 18.0ms (7.8% of total)
ival-atan2: 13.0ms (5.6% of total)
ival-add: 12.0ms (5.2% of total)
ival-asin: 10.0ms (4.3% of total)
ival-acos: 9.0ms (3.9% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series101.0ms (0.5%)

Memory
-20.1MiB live, 131.0MiB allocated
Counts
24 → 828
Calls
Call 1
Inputs
#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<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)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (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 (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 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())
#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))))) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 phi1) (sin.f64 delta)) (patch (*.f64 (sin.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())
#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())
#s(alt (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) (patch (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())
#s(alt (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())
#s(alt (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) #<representation binary64>) () ())
#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())
#s(alt (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())
Outputs
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor 0 delta) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (cos (* 2 phi1))))) (taylor 0 delta) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1))))))) (taylor 0 delta) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1))))))) (taylor 0 delta) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<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) (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<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))))))) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<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))))))) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (-.f64 (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)))) (patch (-.f64 (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)))) #<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) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (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)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<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) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<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) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (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 (* 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) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) (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 (cos.f64 theta) (sin.f64 delta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) (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 (cos.f64 theta) (sin.f64 delta))))))) (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 (cos.f64 theta) (sin.f64 delta))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (cos (* 2 phi1))))) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1))))))) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1))))))) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<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) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<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))))))) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<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))))))) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (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)))) (patch (-.f64 (cos.f64 delta) (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<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) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<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) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))) #<representation binary64>) () ())) ())
#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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (sin delta)) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 delta)) (patch (*.f64 (sin.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin delta) (* -1/6 (* (pow phi1 2) (sin delta))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 delta)) (patch (*.f64 (sin.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin delta) (* (pow phi1 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow phi1 2) (sin delta))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 delta)) (patch (*.f64 (sin.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin delta) (* (pow phi1 2) (+ (* -1/6 (sin delta)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin delta))) (* 1/120 (sin delta)))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 delta)) (patch (*.f64 (sin.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin phi1)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 delta)) (patch (*.f64 (sin.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin phi1)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 delta)) (patch (*.f64 (sin.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin phi1)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 delta)) (patch (*.f64 (sin.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin phi1)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 delta)) (patch (*.f64 (sin.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin phi1)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 delta)) (patch (*.f64 (sin.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin phi1)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 delta)) (patch (*.f64 (sin.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin phi1)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 delta)) (patch (*.f64 (sin.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin phi1)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 delta)) (patch (*.f64 (sin.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin phi1)) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 delta)) (patch (*.f64 (sin.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin phi1) (* -1/6 (* (pow delta 2) (sin phi1))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 delta)) (patch (*.f64 (sin.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin phi1) (* (pow delta 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow delta 2) (sin phi1))))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 delta)) (patch (*.f64 (sin.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin phi1) (* (pow delta 2) (+ (* -1/6 (sin phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin phi1))) (* 1/120 (sin phi1)))))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 delta)) (patch (*.f64 (sin.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin phi1)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 delta)) (patch (*.f64 (sin.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin phi1)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 delta)) (patch (*.f64 (sin.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin phi1)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 delta)) (patch (*.f64 (sin.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin phi1)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 delta)) (patch (*.f64 (sin.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin phi1)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 delta)) (patch (*.f64 (sin.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin phi1)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 delta)) (patch (*.f64 (sin.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin phi1)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 delta)) (patch (*.f64 (sin.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin phi1)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 delta)) (patch (*.f64 (sin.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow delta 2))) (taylor 0 delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow delta 2) (- (* 1/24 (pow delta 2)) 1/2))) (taylor 0 delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/24 (* -1/720 (pow delta 2)))) 1/2))) (taylor 0 delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor inf delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor inf delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor inf delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor inf delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor -inf delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor -inf delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor -inf delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor -inf delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* (cos theta) (sin delta)))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/6 (* (cos theta) (sin delta))) (* 1/120 (* (pow phi1 2) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* 1/120 (* (cos theta) (sin delta))))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin phi1)) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow theta 2) (* (sin delta) (sin phi1)))) (* (sin delta) (sin phi1))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (sin phi1))) (* 1/24 (* (pow theta 2) (* (sin delta) (sin phi1))))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (sin delta) (sin phi1)))) (* 1/24 (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos theta) (sin phi1))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos theta) (sin phi1)))) (* (cos theta) (sin phi1)))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos theta) (sin phi1)) (* (pow delta 2) (+ (* -1/6 (* (cos theta) (sin phi1))) (* 1/120 (* (pow delta 2) (* (cos theta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos theta) (sin phi1)) (* (pow delta 2) (+ (* -1/6 (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos theta) (sin phi1)))) (* 1/120 (* (cos theta) (sin phi1))))))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (patch (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (asin (* (cos theta) (sin delta))) (taylor 0 theta) (#s(alt (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) (patch (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (asin (* (cos theta) (sin delta))) (taylor 0 theta) (#s(alt (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) (patch (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (asin (* (cos theta) (sin delta))) (taylor 0 theta) (#s(alt (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) (patch (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (asin (* (cos theta) (sin delta))) (taylor 0 theta) (#s(alt (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) (patch (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (asin (* (cos theta) (sin delta))) (taylor inf theta) (#s(alt (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) (patch (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (asin (* (cos theta) (sin delta))) (taylor inf theta) (#s(alt (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) (patch (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (asin (* (cos theta) (sin delta))) (taylor inf theta) (#s(alt (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) (patch (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (asin (* (cos theta) (sin delta))) (taylor inf theta) (#s(alt (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) (patch (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (asin (* (cos theta) (sin delta))) (taylor -inf theta) (#s(alt (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) (patch (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (asin (* (cos theta) (sin delta))) (taylor -inf theta) (#s(alt (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) (patch (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (asin (* (cos theta) (sin delta))) (taylor -inf theta) (#s(alt (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) (patch (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (asin (* (cos theta) (sin delta))) (taylor -inf theta) (#s(alt (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) (patch (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (asin (* (cos theta) (sin delta))) (taylor 0 delta) (#s(alt (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) (patch (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (asin (* (cos theta) (sin delta))) (taylor 0 delta) (#s(alt (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) (patch (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (asin (* (cos theta) (sin delta))) (taylor 0 delta) (#s(alt (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) (patch (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (asin (* (cos theta) (sin delta))) (taylor 0 delta) (#s(alt (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) (patch (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (asin (* (cos theta) (sin delta))) (taylor inf delta) (#s(alt (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) (patch (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (asin (* (cos theta) (sin delta))) (taylor inf delta) (#s(alt (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) (patch (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (asin (* (cos theta) (sin delta))) (taylor inf delta) (#s(alt (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) (patch (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (asin (* (cos theta) (sin delta))) (taylor inf delta) (#s(alt (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) (patch (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (asin (* (cos theta) (sin delta))) (taylor -inf delta) (#s(alt (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) (patch (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (asin (* (cos theta) (sin delta))) (taylor -inf delta) (#s(alt (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) (patch (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (asin (* (cos theta) (sin delta))) (taylor -inf delta) (#s(alt (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) (patch (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (asin (* (cos theta) (sin delta))) (taylor -inf delta) (#s(alt (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) (patch (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (cos theta)) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (+ (* -1/6 (cos theta)) (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (+ (* -1/6 (cos theta)) (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (+ (* 1/12 (cos theta)) (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta))))))))))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi1)) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* (cos phi1) (sin phi1))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin phi1))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin phi1))))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/24 (* (cos phi1) (sin phi1)))))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (sin delta)) (taylor 0 phi1) (#s(alt (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (sin phi1) (taylor 0 delta) (#s(alt (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (taylor 0 delta) (#s(alt (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (patch (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.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 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) (patch (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 delta) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 delta) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 delta) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 delta) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 theta) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 theta) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 theta) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 theta) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (patch (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (patch (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
Calls

207 calls:

TimeVariablePointExpression
7.0ms
phi1
@inf
(* (sin phi1) (* (cos theta) (cos phi1)))
5.0ms
delta
@-inf
(- (cos delta) (+ (* (* (sin phi1) (sin delta)) (* (cos phi1) (cos theta))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))))
2.0ms
delta
@inf
(- (cos delta) (+ (* (* (sin phi1) (sin delta)) (* (cos phi1) (cos theta))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))))
1.0ms
phi1
@inf
(- (cos delta) (+ (* (* (sin phi1) (sin delta)) (* (cos phi1) (cos theta))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))))
1.0ms
phi1
@-inf
(- (cos delta) (+ (* (* (sin phi1) (sin delta)) (* (cos phi1) (cos theta))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))))

rewrite382.0ms (2.1%)

Memory
26.7MiB live, 424.8MiB allocated
Algorithm
batch-egg-rewrite
Rules
4 126×lower-*.f32
4 098×lower-*.f64
3 428×lower-/.f64
3 428×lower-/.f32
2 548×lower-fma.f32
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
051446
099424
1369396
22951396
08436396
Stop Event
iter limit
node limit
iter limit
Counts
24 → 465
Calls
Call 1
Inputs
(-.f64 (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))))
(-.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)) (-.f64 (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))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.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 (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(-.f64 (cos.f64 delta) (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))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.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 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(cos.f64 delta)
(*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))
(asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
(cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))))
(acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
Outputs
(+.f64 (cos.f64 delta) (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (cos.f64 delta))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (neg.f64 (*.f64 (cos.f64 delta) (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 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (*.f64 (neg.f64 (cos.f64 delta)) (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 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta)))
(-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.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))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (+.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 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (/.f64 (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(fma.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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (cos.f64 delta))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (+.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 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #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 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (+.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 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (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 (sin.f64 phi1) (*.f64 (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 delta delta)))) (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (+.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 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #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 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (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 (sin.f64 phi1) (*.f64 (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 delta delta)))) (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (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 (sin.f64 phi1) (*.f64 (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 delta delta)))) (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 delta) (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 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 3 binary64))) (+.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.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)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (+.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 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (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 (sin.f64 phi1) (*.f64 (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 delta delta)))) (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #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 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.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)))))
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #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 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #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 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.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)))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #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 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (*.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 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 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 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 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))) (*.f64 (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))))))) (*.f64 (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (*.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (cos.f64 delta)))) (*.f64 (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))))) (cos.f64 delta)))) (*.f64 (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (fma.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (+.f64 #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)))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (*.f64 (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))) (*.f64 (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta 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 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 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 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.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))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #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)))) (neg.f64 (+.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.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))))))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (+.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 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (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 (sin.f64 phi1) (*.f64 (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 delta delta)))) (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (+.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 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 phi1)) #s(literal 2 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) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(-.f64 (/.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/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 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) (neg.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))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(fma.f64 (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))))) (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 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))))))))
(/.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 (*.f64 #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/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))))))) (neg.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 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)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))))) #s(literal -1 binary64))
(*.f64 (sin.f64 phi1) (sin.f64 phi1))
(*.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #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 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1)
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1)))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) lambda1)
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)))))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) lambda1))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) lambda1)))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1))) #s(literal -2 binary64))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(-.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 delta theta)) #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #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 delta theta))))))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 delta theta)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal -1 binary64))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) lambda1)
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))))))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) lambda1))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) lambda1)))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))
(+.f64 (cos.f64 delta) (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (cos.f64 delta))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (neg.f64 (*.f64 (cos.f64 delta) (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 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (*.f64 (neg.f64 (cos.f64 delta)) (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 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta)))
(-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.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))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (+.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 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (/.f64 (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(fma.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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (cos.f64 delta))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (+.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 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #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 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (+.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 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (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 (sin.f64 phi1) (*.f64 (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 delta delta)))) (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (+.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 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #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 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (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 (sin.f64 phi1) (*.f64 (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 delta delta)))) (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (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 (sin.f64 phi1) (*.f64 (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 delta delta)))) (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 delta) (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 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 3 binary64))) (+.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.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)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (+.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 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (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 (sin.f64 phi1) (*.f64 (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 delta delta)))) (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #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 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.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)))))
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #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 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #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 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.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)))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #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 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (*.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 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 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 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 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))) (*.f64 (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))))))) (*.f64 (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (*.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (cos.f64 delta)))) (*.f64 (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))))) (cos.f64 delta)))) (*.f64 (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (fma.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (+.f64 #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)))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (*.f64 (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))) (*.f64 (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta 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 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 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 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.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))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #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)))) (neg.f64 (+.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.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))))))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (+.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 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (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 (sin.f64 phi1) (*.f64 (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 delta delta)))) (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (+.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 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1)
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1)))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 delta phi1)) #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 delta)) (cos.f64 (+.f64 delta phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 delta phi1))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 delta)) (cos.f64 (+.f64 delta phi1)))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 delta)) (cos.f64 (+.f64 delta phi1)))) #s(literal -2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 delta)) (cos.f64 (+.f64 delta phi1))))))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi1 delta)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 delta phi1)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 delta phi1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 delta)) (cos.f64 (+.f64 delta phi1))))) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 delta)) (cos.f64 (+.f64 delta phi1)))) #s(literal -1 binary64))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 delta)) (cos.f64 (+.f64 delta phi1))) #s(literal 1/2 binary64))
(cos.f64 delta)
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 (+.f64 phi1 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))) phi1)) (cos.f64 (+.f64 phi1 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 (+.f64 phi1 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 (+.f64 phi1 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal -2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 (+.f64 phi1 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(/.f64 (*.f64 (sin.f64 phi1) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta))) (sin.f64 phi1)) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi1 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))) phi1)) (cos.f64 (+.f64 phi1 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 (+.f64 phi1 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (sin.f64 phi1) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta))) (sin.f64 phi1))) #s(literal -2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 (+.f64 phi1 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal -1 binary64))
(*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 (+.f64 phi1 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (sin.f64 delta))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (acos.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))))
(-.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (*.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)))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (acos.f64 (*.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 (*.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 (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (acos.f64 (*.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 (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (acos.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (acos.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (acos.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (acos.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(/.f64 (*.f64 (sin.f64 phi1) (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 phi1 theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 phi1) (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 phi1 theta))) (sin.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta))) (sin.f64 phi1)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (sin.f64 phi1) (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 phi1 theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (sin.f64 phi1) (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 phi1 theta))) (sin.f64 phi1))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta))) (sin.f64 phi1))) #s(literal -2 binary64))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (cos.f64 theta))
(+.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.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))))
(+.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 (*.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(cos.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(-.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 2 binary64))))))
(-.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (/.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 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (*.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 2 binary64))))))
(-.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (neg.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))) (*.f64 #s(literal 1 binary64) (sin.f64 (neg.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(-.f64 (*.f64 (sin.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64))))) #s(literal 1 binary64)))
(sin.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(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 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (cos.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(fma.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(fma.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)) (-.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(/.f64 (-.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (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 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (-.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)) (-.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (-.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(/.f64 (fma.f64 (+.f64 (sin.f64 (-.f64 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))) phi1)) (sin.f64 (+.f64 phi1 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (sin.f64 (-.f64 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))) phi1)) (sin.f64 (+.f64 phi1 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1))))))
(/.f64 (fma.f64 (+.f64 (sin.f64 (-.f64 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))) phi1)) (sin.f64 (+.f64 phi1 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (sin.f64 delta) (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 phi1 theta)))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (sin.f64 delta) (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 phi1 theta)))) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1))))))
(/.f64 (fma.f64 (*.f64 (sin.f64 delta) (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 phi1 theta)))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (sin.f64 delta) (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta)))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (sin.f64 delta) (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta)))) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1))))))
(/.f64 (fma.f64 (*.f64 (sin.f64 delta) (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta)))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (cos.f64 phi1) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (cos.f64 phi1) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1))))))
(/.f64 (fma.f64 (*.f64 (cos.f64 phi1) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 phi1 theta))) (sin.f64 delta)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 phi1 theta))) (sin.f64 delta)) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 phi1 theta))) (sin.f64 delta)) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta))) (sin.f64 delta)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta))) (sin.f64 delta)) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta))) (sin.f64 delta)) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta))) (cos.f64 phi1)) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))) phi1)) (sin.f64 (+.f64 phi1 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 delta) (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 phi1 theta)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 delta) (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 phi1) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 phi1 theta))) (sin.f64 delta)))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta))) (sin.f64 delta)))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta))) (cos.f64 phi1)))) #s(literal 4 binary64))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))) (+.f64 (sin.f64 (-.f64 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))) phi1)) (sin.f64 (+.f64 phi1 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))))))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))) (*.f64 (sin.f64 delta) (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 phi1 theta)))))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))) (*.f64 (sin.f64 delta) (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta)))))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))) (*.f64 (cos.f64 phi1) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))) (*.f64 (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 phi1 theta))) (sin.f64 delta)))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta))) (sin.f64 delta)))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))) (*.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta))) (cos.f64 phi1)))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (+.f64 (sin.f64 (-.f64 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))) phi1)) (sin.f64 (+.f64 phi1 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 delta) (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 phi1 theta)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 delta) (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (cos.f64 phi1) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 phi1 theta))) (sin.f64 delta)))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta))) (sin.f64 delta)))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta))) (cos.f64 phi1)))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (*.f64 (-.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 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (neg.f64 (-.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(pow.f64 (/.f64 (fma.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (-.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(*.f64 (-.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(+.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1))))
(+.f64 (*.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (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)))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (cos.f64 delta))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (cos.f64 delta))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (sin.f64 phi1) (cos.f64 delta))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta)) (+.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 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #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 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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)))) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (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 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (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 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (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 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #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 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (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 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (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 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (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 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (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 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (fma.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #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 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) (*.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta)) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))) (*.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta)) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta 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 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta)))))
(pow.f64 (/.f64 (fma.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (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 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (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 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (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 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))))
(acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(fabs.f64 (remainder.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (*.f64 #s(literal 2 binary64) (PI.f64))))
(fabs.f64 (neg.f64 (remainder.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (*.f64 #s(literal 2 binary64) (PI.f64)))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(/.f64 (-.f64 (*.f64 (PI.f64) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(/.f64 (-.f64 (*.f64 (PI.f64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (*.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))))) (*.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (*.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))))) (*.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(/.f64 (-.f64 (*.f64 (neg.f64 (PI.f64)) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (*.f64 #s(literal -2 binary64) (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))))) (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(/.f64 (-.f64 (*.f64 (neg.f64 (PI.f64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (*.f64 #s(literal -2 binary64) (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))))) (*.f64 #s(literal -2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(-.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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)))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(/.f64 (-.f64 (*.f64 (PI.f64) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(/.f64 (-.f64 (*.f64 (PI.f64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (*.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))))) (*.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (*.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))))) (*.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(/.f64 (-.f64 (*.f64 (neg.f64 (PI.f64)) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (*.f64 #s(literal -2 binary64) (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))))) (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(/.f64 (-.f64 (*.f64 (neg.f64 (PI.f64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (*.f64 #s(literal -2 binary64) (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))))) (*.f64 #s(literal -2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))

simplify729.0ms (3.9%)

Memory
-1.9MiB live, 709.3MiB allocated
Algorithm
egg-herbie
Rules
13 874×lower-fma.f64
13 874×lower-fma.f32
7 518×lower-*.f64
7 518×lower-*.f32
4 642×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
047517685
1162317455
2561817396
0833416565
Stop Event
iter limit
node limit
Counts
828 → 818
Calls
Call 1
Inputs
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (cos (* 2 phi1)))))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(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) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (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 (* 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) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos 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) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (cos (* 2 phi1)))))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(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) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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)))))))
(* phi1 (sin delta))
(* phi1 (+ (sin delta) (* -1/6 (* (pow phi1 2) (sin delta)))))
(* phi1 (+ (sin delta) (* (pow phi1 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow phi1 2) (sin delta)))))))
(* phi1 (+ (sin delta) (* (pow phi1 2) (+ (* -1/6 (sin delta)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin delta))) (* 1/120 (sin delta))))))))
(* (sin delta) (sin phi1))
(* (sin delta) (sin phi1))
(* (sin delta) (sin phi1))
(* (sin delta) (sin phi1))
(* (sin delta) (sin phi1))
(* (sin delta) (sin phi1))
(* (sin delta) (sin phi1))
(* (sin delta) (sin phi1))
(* delta (sin phi1))
(* delta (+ (sin phi1) (* -1/6 (* (pow delta 2) (sin phi1)))))
(* delta (+ (sin phi1) (* (pow delta 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow delta 2) (sin phi1)))))))
(* delta (+ (sin phi1) (* (pow delta 2) (+ (* -1/6 (sin phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(* (sin delta) (sin phi1))
(* (sin delta) (sin phi1))
(* (sin delta) (sin phi1))
(* (sin delta) (sin phi1))
(* (sin delta) (sin phi1))
(* (sin delta) (sin phi1))
(* (sin delta) (sin phi1))
(* (sin delta) (sin phi1))
1
(+ 1 (* -1/2 (pow delta 2)))
(+ 1 (* (pow delta 2) (- (* 1/24 (pow delta 2)) 1/2)))
(+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/24 (* -1/720 (pow delta 2)))) 1/2)))
(cos delta)
(cos delta)
(cos delta)
(cos delta)
(cos delta)
(cos delta)
(cos delta)
(cos delta)
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* (cos theta) (sin delta))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/6 (* (cos theta) (sin delta))) (* 1/120 (* (pow phi1 2) (* (cos theta) (sin delta))))))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* 1/120 (* (cos theta) (sin delta)))))))))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (sin delta) (sin phi1))
(+ (* -1/2 (* (pow theta 2) (* (sin delta) (sin phi1)))) (* (sin delta) (sin phi1)))
(+ (* (sin delta) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (sin phi1))) (* 1/24 (* (pow theta 2) (* (sin delta) (sin phi1)))))))
(+ (* (sin delta) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (sin delta) (sin phi1)))) (* 1/24 (* (sin delta) (sin phi1))))))))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* delta (* (cos theta) (sin phi1)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos theta) (sin phi1)))) (* (cos theta) (sin phi1))))
(* delta (+ (* (cos theta) (sin phi1)) (* (pow delta 2) (+ (* -1/6 (* (cos theta) (sin phi1))) (* 1/120 (* (pow delta 2) (* (cos theta) (sin phi1))))))))
(* delta (+ (* (cos theta) (sin phi1)) (* (pow delta 2) (+ (* -1/6 (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos theta) (sin phi1)))) (* 1/120 (* (cos theta) (sin phi1)))))))))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(asin (* (cos theta) (sin delta)))
(asin (* (cos theta) (sin delta)))
(asin (* (cos theta) (sin delta)))
(asin (* (cos theta) (sin delta)))
(asin (* (cos theta) (sin delta)))
(asin (* (cos theta) (sin delta)))
(asin (* (cos theta) (sin delta)))
(asin (* (cos theta) (sin delta)))
(asin (* (cos theta) (sin delta)))
(asin (* (cos theta) (sin delta)))
(asin (* (cos theta) (sin delta)))
(asin (* (cos theta) (sin delta)))
(asin (* (cos theta) (sin delta)))
(asin (* (cos theta) (sin delta)))
(asin (* (cos theta) (sin delta)))
(asin (* (cos theta) (sin delta)))
(asin (* (cos theta) (sin delta)))
(asin (* (cos theta) (sin delta)))
(asin (* (cos theta) (sin delta)))
(asin (* (cos theta) (sin delta)))
(asin (* (cos theta) (sin delta)))
(asin (* (cos theta) (sin delta)))
(asin (* (cos theta) (sin delta)))
(asin (* (cos theta) (sin delta)))
(* phi1 (cos theta))
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (+ (* -1/6 (cos theta)) (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta))))))))))
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (+ (* -1/6 (cos theta)) (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (+ (* 1/12 (cos theta)) (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta)))))))))))))))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (cos phi1) (sin phi1))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* (cos phi1) (sin phi1)))
(+ (* (cos phi1) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin phi1))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin phi1)))))))
(+ (* (cos phi1) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/24 (* (cos phi1) (sin phi1))))))))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (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))))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos (+ (* (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)))))
Outputs
(+ 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 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (cos (* 2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (fma.f64 (cos.f64 phi1) (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))))
(fma.f64 delta (fma.f64 delta (fma.f64 #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)) #s(literal -1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 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))) (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))))
(fma.f64 delta (-.f64 (*.f64 delta (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (*.f64 delta #s(literal 1/6 binary64)) (fma.f64 #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)) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (neg.f64 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta)))) (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 phi1 (fma.f64 phi1 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))) #s(literal 2/3 binary64) (neg.f64 (cos.f64 delta))) (neg.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))) (cos.f64 delta))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(-.f64 (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (*.f64 #s(literal 1/2 binary64) (*.f64 theta theta)) (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 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(-.f64 (fma.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (fma.f64 (*.f64 theta theta) #s(literal -1/24 binary64) #s(literal 1/2 binary64))) (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 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(-.f64 (fma.f64 (*.f64 theta theta) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (fma.f64 (*.f64 theta theta) #s(literal 1/720 binary64) #s(literal -1/24 binary64))))) (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 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.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 phi1 (fma.f64 phi1 (*.f64 phi1 (*.f64 phi1 #s(literal -1/3 binary64))) phi1))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(*.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) (fma.f64 phi1 (*.f64 phi1 #s(literal 2/45 binary64)) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(*.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/315 binary64) #s(literal 2/45 binary64)) #s(literal -1/3 binary64)) #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))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)) (neg.f64 lambda1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)) lambda1)) (neg.f64 lambda1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 theta (sin.f64 delta)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (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 theta (fma.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 (*.f64 theta theta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(*.f64 theta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 (*.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (*.f64 (*.f64 theta theta) (*.f64 theta theta)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* delta (* (cos phi1) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 delta (sin.f64 theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (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 delta (fma.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(*.f64 delta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))) (*.f64 (*.f64 delta delta) (*.f64 delta delta)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(fma.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(*.f64 theta (fma.f64 (*.f64 theta theta) (*.f64 (sin.f64 delta) (fma.f64 (*.f64 theta theta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (sin.f64 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))))))))
(*.f64 theta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (fma.f64 (*.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (*.f64 (*.f64 theta theta) (*.f64 theta theta)))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(*.f64 delta (fma.f64 (*.f64 delta delta) (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (sin.f64 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))))))))
(*.f64 delta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta) (*.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))) (*.f64 (*.f64 delta delta) (*.f64 delta delta)))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))) lambda1)) (neg.f64 lambda1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(+ 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 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (cos (* 2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (fma.f64 (cos.f64 phi1) (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))))
(fma.f64 delta (fma.f64 delta (fma.f64 #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)) #s(literal -1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 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))) (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))))
(fma.f64 delta (-.f64 (*.f64 delta (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (*.f64 delta #s(literal 1/6 binary64)) (fma.f64 #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)) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (neg.f64 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta)))) (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 phi1 (fma.f64 phi1 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))) #s(literal 2/3 binary64) (neg.f64 (cos.f64 delta))) (neg.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))) (cos.f64 delta))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(-.f64 (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (*.f64 #s(literal 1/2 binary64) (*.f64 theta theta)) (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 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(-.f64 (fma.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (fma.f64 (*.f64 theta theta) #s(literal -1/24 binary64) #s(literal 1/2 binary64))) (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 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(-.f64 (fma.f64 (*.f64 theta theta) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (fma.f64 (*.f64 theta theta) #s(literal 1/720 binary64) #s(literal -1/24 binary64))))) (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 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)) (neg.f64 lambda1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (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 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) 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 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1)) (neg.f64 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 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1)) (neg.f64 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 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1)) (neg.f64 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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(* phi1 (sin delta))
(*.f64 phi1 (sin.f64 delta))
(* phi1 (+ (sin delta) (* -1/6 (* (pow phi1 2) (sin delta)))))
(*.f64 phi1 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 delta)))
(* phi1 (+ (sin delta) (* (pow phi1 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow phi1 2) (sin delta)))))))
(*.f64 phi1 (fma.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 delta) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (sin.f64 delta)))
(* phi1 (+ (sin delta) (* (pow phi1 2) (+ (* -1/6 (sin delta)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin delta))) (* 1/120 (sin delta))))))))
(*.f64 phi1 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1)))))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(* delta (sin phi1))
(*.f64 delta (sin.f64 phi1))
(* delta (+ (sin phi1) (* -1/6 (* (pow delta 2) (sin phi1)))))
(*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 phi1)))
(* delta (+ (sin phi1) (* (pow delta 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow delta 2) (sin phi1)))))))
(*.f64 delta (fma.f64 (*.f64 delta delta) (*.f64 (sin.f64 phi1) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (sin.f64 phi1)))
(* delta (+ (sin phi1) (* (pow delta 2) (+ (* -1/6 (sin phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(*.f64 delta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))) (*.f64 (*.f64 delta delta) (*.f64 delta delta)))))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow delta 2)))
(fma.f64 delta (*.f64 delta #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow delta 2) (- (* 1/24 (pow delta 2)) 1/2)))
(fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/24 (* -1/720 (pow delta 2)))) 1/2)))
(fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(cos delta)
(cos.f64 delta)
(cos delta)
(cos.f64 delta)
(cos delta)
(cos.f64 delta)
(cos delta)
(cos.f64 delta)
(cos delta)
(cos.f64 delta)
(cos delta)
(cos.f64 delta)
(cos delta)
(cos.f64 delta)
(cos delta)
(cos.f64 delta)
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta)))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* (cos theta) (sin delta))))
(*.f64 phi1 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/6 (* (cos theta) (sin delta))) (* 1/120 (* (pow phi1 2) (* (cos theta) (sin delta))))))))
(*.f64 phi1 (fma.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* 1/120 (* (cos theta) (sin delta)))))))))
(*.f64 phi1 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1)))))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(+ (* -1/2 (* (pow theta 2) (* (sin delta) (sin phi1)))) (* (sin delta) (sin phi1)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(+ (* (sin delta) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (sin phi1))) (* 1/24 (* (pow theta 2) (* (sin delta) (sin phi1)))))))
(fma.f64 (sin.f64 phi1) (sin.f64 delta) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (fma.f64 (*.f64 theta theta) #s(literal 1/24 binary64) #s(literal -1/2 binary64)))))
(+ (* (sin delta) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (sin delta) (sin phi1)))) (* 1/24 (* (sin delta) (sin phi1))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (fma.f64 (*.f64 theta theta) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 (*.f64 theta theta) (*.f64 theta theta))))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* delta (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 delta (sin.f64 phi1)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos theta) (sin phi1)))) (* (cos theta) (sin phi1))))
(*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 theta) (sin.f64 phi1))))
(* delta (+ (* (cos theta) (sin phi1)) (* (pow delta 2) (+ (* -1/6 (* (cos theta) (sin phi1))) (* 1/120 (* (pow delta 2) (* (cos theta) (sin phi1))))))))
(*.f64 delta (fma.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (*.f64 (cos.f64 theta) (sin.f64 phi1))))
(* delta (+ (* (cos theta) (sin phi1)) (* (pow delta 2) (+ (* -1/6 (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos theta) (sin phi1)))) (* 1/120 (* (cos theta) (sin phi1)))))))))
(*.f64 delta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))) (*.f64 (*.f64 delta delta) (*.f64 delta delta)))))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(* phi1 (cos theta))
(*.f64 phi1 (cos.f64 theta))
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))
(*.f64 phi1 (fma.f64 phi1 (*.f64 phi1 (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))) (cos.f64 theta)))
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (+ (* -1/6 (cos theta)) (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta))))))))))
(*.f64 phi1 (fma.f64 (*.f64 phi1 phi1) (fma.f64 phi1 (*.f64 phi1 (*.f64 (cos.f64 theta) #s(literal 2/15 binary64))) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))) (cos.f64 theta)))
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (+ (* -1/6 (cos theta)) (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (+ (* 1/12 (cos theta)) (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta)))))))))))))))
(*.f64 phi1 (fma.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) (fma.f64 (cos.f64 theta) #s(literal 2/15 binary64) (*.f64 (*.f64 phi1 phi1) (fma.f64 (cos.f64 theta) #s(literal -1/144 binary64) (*.f64 (cos.f64 theta) #s(literal -29/5040 binary64))))) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))) (cos.f64 theta)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (sin phi1))
(*.f64 (cos.f64 phi1) (sin.f64 phi1))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* (cos phi1) (sin phi1)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))
(+ (* (cos phi1) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin phi1))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin phi1)))))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi1) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 (*.f64 theta theta) #s(literal 1/24 binary64) #s(literal -1/2 binary64)))))
(+ (* (cos phi1) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/24 (* (cos phi1) (sin phi1))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 (*.f64 theta theta) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 (*.f64 theta theta) (*.f64 theta theta))))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos theta) (sin delta))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))
(fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))
(fma.f64 phi1 (fma.f64 phi1 (*.f64 (cos.f64 theta) (*.f64 #s(literal -1/2 binary64) (sin.f64 delta))) (cos.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta))))))) (* (cos theta) (sin delta)))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 phi1 (*.f64 (cos.f64 delta) #s(literal -1/6 binary64)) (*.f64 (cos.f64 theta) (*.f64 #s(literal -1/2 binary64) (sin.f64 delta)))) (cos.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))
(+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))))
(fma.f64 delta (fma.f64 delta (*.f64 (sin.f64 phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1))
(+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta)))))
(fma.f64 delta (fma.f64 delta (fma.f64 (sin.f64 phi1) #s(literal -1/2 binary64) (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (cos.f64 theta) #s(literal -1/6 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (sin.f64 phi1) (cos.f64 delta) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 #s(literal -1/2 binary64) (*.f64 theta theta)))))
(+ (* (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 (cos.f64 phi1) (sin.f64 delta) (fma.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 (*.f64 theta theta) #s(literal 1/24 binary64) #s(literal -1/2 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 (cos.f64 phi1) (sin.f64 delta) (fma.f64 (*.f64 theta theta) (fma.f64 (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (sin.f64 delta)) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 (*.f64 theta theta) #s(literal -1/720 binary64) #s(literal 1/24 binary64))))) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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))
(fma.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (neg.f64 (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 delta (fma.f64 delta (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))))) (-.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 delta (fma.f64 delta (fma.f64 (*.f64 (*.f64 delta #s(literal 1/6 binary64)) (cos.f64 phi1)) (*.f64 (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))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))))) (-.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))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (neg.f64 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta)))) (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 phi1 (fma.f64 phi1 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))) #s(literal 2/3 binary64) (neg.f64 (cos.f64 delta))) (neg.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (*.f64 #s(literal 1/2 binary64) (*.f64 theta theta)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.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 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (fma.f64 (*.f64 theta theta) #s(literal -1/24 binary64) #s(literal 1/2 binary64))) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (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 (*.f64 theta theta) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (fma.f64 (*.f64 theta theta) #s(literal 1/720 binary64) #s(literal -1/24 binary64))))) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))

eval275.0ms (1.5%)

Memory
0.1MiB live, 421.6MiB allocated
Compiler

Compiled 70 301 to 3 610 computations (94.9% saved)

prune296.0ms (1.6%)

Memory
15.9MiB live, 342.7MiB allocated
Pruning

39 alts after pruning (38 fresh and 1 done)

PrunedKeptTotal
New1 724291 753
Fresh7916
Picked415
Done000
Total1 735391 774
Accuracy
100.0%
Counts
1 774 → 39
Alt Table
Click to see full alt table
StatusAccuracyProgram
30.7%
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
30.7%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
19.4%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
19.8%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
42.4%
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)))))
35.9%
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
44.9%
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
99.6%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
99.8%
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
99.8%
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1)
87.0%
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) lambda1)
99.8%
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta)))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
77.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
94.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
80.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 delta (*.f64 delta #s(literal -1/2 binary64)) #s(literal 1 binary64))))
83.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
94.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))))
99.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (*.f64 (/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))) (cos.f64 delta))))))
92.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))) #s(literal 1 binary64))))))
94.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 phi1) (sin.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))))))
91.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))))))
86.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
84.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) phi1)))))
83.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
78.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
81.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (fma.f64 delta (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))
86.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
78.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 1 binary64)))
72.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
76.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 phi1)) (cos.f64 delta)))
85.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 (cos.f64 delta) (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))))))
84.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
83.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
76.5%
(+.f64 lambda1 (atan2.f64 (*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (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))))))
80.5%
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (-.f64 (cos.f64 delta) (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))))))
75.7%
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)))
Compiler

Compiled 2 870 to 1 607 computations (44% saved)

simplify654.0ms (3.5%)

Memory
4.7MiB live, 457.5MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(sin.f64 delta)
cost-diff0
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1)))
cost-diff0
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
cost-diff0
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
cost-diff0
(*.f64 (sin.f64 theta) (sin.f64 delta))
cost-diff0
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
cost-diff0
(*.f64 (sin.f64 theta) (sin.f64 delta))
cost-diff0
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
cost-diff0
(sin.f64 delta)
cost-diff0
(*.f64 (sin.f64 delta) (sin.f64 theta))
cost-diff0
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
cost-diff0
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
cost-diff6592
(-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
Rules
19 232×lower-fma.f32
19 222×lower-fma.f64
3 538×lower-*.f32
3 518×lower-*.f64
2 454×lower-+.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
046536
089536
1153533
2288533
3729525
41780525
53217525
64533525
75953525
86612525
97069525
107204525
117232525
127253525
08138521
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(cos.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 (+.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/2 binary64)
(*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(sin.f64 phi1)
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
(*.f64 (cos.f64 phi1) (cos.f64 theta))
(cos.f64 theta)
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
lambda1
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(sin.f64 delta)
delta
(sin.f64 theta)
theta
(cos.f64 delta)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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
(-.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 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(sin.f64 phi1)
(cos.f64 delta)
(neg.f64 (sin.f64 phi1))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1)))
(sin.f64 delta)
delta
(*.f64 (sin.f64 theta) (cos.f64 phi1))
(sin.f64 theta)
theta
(cos.f64 phi1)
phi1
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(cos.f64 delta)
(sin.f64 phi1)
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
(*.f64 (cos.f64 phi1) (cos.f64 theta))
(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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (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)) (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (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)) (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(*.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 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(-.f64 (cos.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 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(cos.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 (+.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/2 binary64)
(*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(sin.f64 phi1)
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
(*.f64 (cos.f64 phi1) (cos.f64 theta))
(cos.f64 theta)
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)))
lambda1
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 delta)
delta
(sin.f64 theta)
theta
(cos.f64 delta)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.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)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.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) (*.f64 (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 #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 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(*.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 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(sin.f64 phi1)
(cos.f64 delta)
(neg.f64 (sin.f64 phi1))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1)))
(*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(sin.f64 delta)
delta
(*.f64 (sin.f64 theta) (cos.f64 phi1))
(sin.f64 theta)
theta
(cos.f64 phi1)
phi1
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(-.f64 (cos.f64 delta) (*.f64 (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 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(fma.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(cos.f64 delta)
(sin.f64 phi1)
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
(*.f64 (cos.f64 phi1) (cos.f64 theta))
(cos.f64 theta)
(neg.f64 (sin.f64 phi1))
lambda1

localize368.0ms (2%)

Memory
1.1MiB live, 429.1MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy99.7%
(*.f64 (sin.f64 theta) (cos.f64 phi1))
accuracy99.7%
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1)))
accuracy99.7%
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
accuracy99.1%
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
accuracy99.8%
(*.f64 (sin.f64 phi1) (cos.f64 delta))
accuracy99.7%
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
accuracy99.7%
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy99.1%
(fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
accuracy99.7%
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
accuracy99.7%
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy99.5%
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
accuracy99.2%
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
accuracy100.0%
(cos.f64 delta)
accuracy100.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
accuracy99.9%
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
accuracy99.7%
(*.f64 (sin.f64 delta) (sin.f64 theta))
accuracy99.7%
(*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))
accuracy99.7%
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
accuracy99.0%
(-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
accuracy78.1%
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
Samples
122.0ms84×2valid
66.0ms133×0valid
39.0ms39×1valid
Compiler

Compiled 558 to 54 computations (90.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 166.0ms
ival-cos: 35.0ms (21.1% of total)
ival-mult: 31.0ms (18.7% of total)
adjust: 30.0ms (18.1% of total)
ival-sin: 25.0ms (15% of total)
ival-add: 18.0ms (10.8% of total)
ival-atan2: 14.0ms (8.4% of total)
ival-sub: 5.0ms (3% of total)
ival-pow2: 4.0ms (2.4% of total)
ival-neg: 2.0ms (1.2% of total)
exact: 1.0ms (0.6% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series73.0ms (0.4%)

Memory
11.3MiB live, 85.8MiB allocated
Counts
26 → 780
Calls
Call 1
Inputs
#s(alt (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 delta) (sin.f64 theta)) (patch (*.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())
#s(alt (sin.f64 delta) (patch (sin.f64 delta) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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)) (-.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)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<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)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())
#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())
#s(alt (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())
#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<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 (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 phi1) (cos.f64 delta)) (patch (*.f64 (sin.f64 phi1) (cos.f64 delta)) #<representation binary64>) () ())
#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())
Outputs
#s(alt (- 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (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 (cos (* 2 phi1)))) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (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))))))))) (* -1/2 (cos (* 2 phi1)))) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 (atan2 (* (sin delta) (sin theta)) (cos delta)) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (sin delta) (sin theta)) (cos delta)) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (sin delta) (sin theta)) (cos delta)) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (sin delta) (sin theta)) (cos delta)) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (sin theta)) (cos delta)) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (sin theta)) (cos delta)) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (sin theta)) (cos delta)) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (sin delta) (sin theta)) (cos delta)) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (sin delta) (sin theta)) (cos delta)) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (sin delta) (sin theta)) (cos delta)) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (sin delta) (sin theta)) (cos delta)) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (sin delta) (sin theta)) (cos delta)) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (sin delta) (sin theta)) (cos delta)) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (sin delta) (sin theta)) (cos delta)) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (sin delta) (sin theta)) (cos delta)) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (sin delta) (sin theta)) (cos delta)) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (sin delta) (sin theta)) (cos delta)) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (sin delta) (sin theta)) (cos delta)) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (sin delta) (sin theta)) (cos delta)) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (sin delta) (sin theta)) (cos delta)) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (sin delta) (sin theta)) (cos delta)) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (sin delta) (sin theta)) (cos delta)) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (sin delta) (sin theta)) (cos delta)) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (sin delta) (sin theta)) (cos delta)) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (sin delta) (sin theta)) (cos delta)) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (sin delta) (sin theta)) (cos delta)) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (sin delta) (sin theta)) (cos delta)) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (sin delta) (sin theta)) (cos delta)) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (sin delta) (sin theta)) (cos delta)) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (sin delta) (sin theta)) (cos delta)) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (sin delta) (sin theta)) (cos delta)) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 delta) (sin.f64 theta)) (patch (*.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 delta) (sin.f64 theta)) (patch (*.f64 (sin.f64 delta) (sin.f64 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 (*.f64 (sin.f64 delta) (sin.f64 theta)) (patch (*.f64 (sin.f64 delta) (sin.f64 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 (*.f64 (sin.f64 delta) (sin.f64 theta)) (patch (*.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) (sin.f64 theta)) (patch (*.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) (sin.f64 theta)) (patch (*.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) (sin.f64 theta)) (patch (*.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) (sin.f64 theta)) (patch (*.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) (sin.f64 theta)) (patch (*.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) (sin.f64 theta)) (patch (*.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) (sin.f64 theta)) (patch (*.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) (sin.f64 theta)) (patch (*.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 delta) (sin.f64 theta)) (patch (*.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 delta) (sin.f64 theta)) (patch (*.f64 (sin.f64 delta) (sin.f64 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 (*.f64 (sin.f64 delta) (sin.f64 theta)) (patch (*.f64 (sin.f64 delta) (sin.f64 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 (*.f64 (sin.f64 delta) (sin.f64 theta)) (patch (*.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 delta) (sin.f64 theta)) (patch (*.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 delta) (sin.f64 theta)) (patch (*.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 delta) (sin.f64 theta)) (patch (*.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 delta) (sin.f64 theta)) (patch (*.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 delta) (sin.f64 theta)) (patch (*.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 delta) (sin.f64 theta)) (patch (*.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 delta) (sin.f64 theta)) (patch (*.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 delta) (sin.f64 theta)) (patch (*.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt delta (taylor 0 delta) (#s(alt (sin.f64 delta) (patch (sin.f64 delta) #<representation binary64>) () ())) ())
#s(alt (* delta (+ 1 (* -1/6 (pow delta 2)))) (taylor 0 delta) (#s(alt (sin.f64 delta) (patch (sin.f64 delta) #<representation binary64>) () ())) ())
#s(alt (* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)))) (taylor 0 delta) (#s(alt (sin.f64 delta) (patch (sin.f64 delta) #<representation binary64>) () ())) ())
#s(alt (* delta (+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/120 (* -1/5040 (pow delta 2)))) 1/6)))) (taylor 0 delta) (#s(alt (sin.f64 delta) (patch (sin.f64 delta) #<representation binary64>) () ())) ())
#s(alt (sin delta) (taylor inf delta) (#s(alt (sin.f64 delta) (patch (sin.f64 delta) #<representation binary64>) () ())) ())
#s(alt (sin delta) (taylor inf delta) (#s(alt (sin.f64 delta) (patch (sin.f64 delta) #<representation binary64>) () ())) ())
#s(alt (sin delta) (taylor inf delta) (#s(alt (sin.f64 delta) (patch (sin.f64 delta) #<representation binary64>) () ())) ())
#s(alt (sin delta) (taylor inf delta) (#s(alt (sin.f64 delta) (patch (sin.f64 delta) #<representation binary64>) () ())) ())
#s(alt (sin delta) (taylor -inf delta) (#s(alt (sin.f64 delta) (patch (sin.f64 delta) #<representation binary64>) () ())) ())
#s(alt (sin delta) (taylor -inf delta) (#s(alt (sin.f64 delta) (patch (sin.f64 delta) #<representation binary64>) () ())) ())
#s(alt (sin delta) (taylor -inf delta) (#s(alt (sin.f64 delta) (patch (sin.f64 delta) #<representation binary64>) () ())) ())
#s(alt (sin delta) (taylor -inf delta) (#s(alt (sin.f64 delta) (patch (sin.f64 delta) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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)) (-.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)) (-.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))) (- 1 (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)) (-.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)) (-.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))) (- 1 (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)) (-.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)) (-.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))) (- 1 (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)) (-.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)) (-.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)) (-.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)) (-.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))) (- 1 (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)) (-.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)) (-.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))) (- 1 (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)) (-.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)) (-.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))) (- 1 (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)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2)))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.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))) (- 1 (pow (sin phi1) 2))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<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) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) 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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) 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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) 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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) 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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) 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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) 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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (pow phi1 2) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 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 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 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 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 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 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 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 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (cos theta))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* (cos phi1) (cos theta)))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (cos theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (cos theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (cos theta)))))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (cos theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* 1/120 (* (cos phi1) (cos theta))))))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (sin delta)) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* 1/24 (* (pow phi1 2) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* 1/24 (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (* 1/12 (* (cos theta) (sin delta))))))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (+ (* 1/12 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/144 (* (cos theta) (sin delta))) (+ (* -1/240 (* (cos theta) (sin delta))) (+ (* -1/720 (* (cos theta) (sin delta))) (* -1/5040 (* (cos theta) (sin delta)))))))))))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/120 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/120 (* (cos phi1) (* (cos theta) (sin phi1)))))))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin phi1))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1))))))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (patch (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow delta 2))) (taylor 0 delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow delta 2) (- (* 1/24 (pow delta 2)) 1/2))) (taylor 0 delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/24 (* -1/720 (pow delta 2)))) 1/2))) (taylor 0 delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor inf delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor inf delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor inf delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor inf delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor -inf delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor -inf delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor -inf delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor -inf delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<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 (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (sin delta)))) (taylor 0 phi1) (#s(alt (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (+ (* -1 (sin delta)) (* -1 (* phi1 (cos delta)))))) (taylor 0 phi1) (#s(alt (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (+ (* -1 (sin delta)) (* phi1 (+ (* -1 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (sin delta)) (* -1/6 (sin delta)))))))))) (taylor 0 phi1) (#s(alt (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (taylor inf phi1) (#s(alt (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (taylor inf phi1) (#s(alt (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (taylor inf phi1) (#s(alt (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (taylor inf phi1) (#s(alt (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (taylor -inf phi1) (#s(alt (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (taylor -inf phi1) (#s(alt (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (taylor -inf phi1) (#s(alt (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (taylor -inf phi1) (#s(alt (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (pow (sin phi1) 2))) (taylor 0 delta) (#s(alt (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (* -1 (pow (sin phi1) 2)))) (taylor 0 delta) (#s(alt (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* delta (- (* 1/2 (pow (sin phi1) 2)) 1/2)))))) (taylor 0 delta) (#s(alt (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* delta (- (+ (* 1/6 (* delta (* (cos phi1) (sin phi1)))) (* 1/2 (pow (sin phi1) 2))) 1/2)))))) (taylor 0 delta) (#s(alt (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (taylor inf delta) (#s(alt (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (taylor inf delta) (#s(alt (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (taylor inf delta) (#s(alt (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (taylor inf delta) (#s(alt (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (taylor -inf delta) (#s(alt (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (taylor -inf delta) (#s(alt (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (taylor -inf delta) (#s(alt (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (taylor -inf delta) (#s(alt (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (cos delta)) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (cos.f64 delta)) (patch (*.f64 (sin.f64 phi1) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (cos delta) (* -1/6 (* (pow phi1 2) (cos delta))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (cos.f64 delta)) (patch (*.f64 (sin.f64 phi1) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (cos delta) (* (pow phi1 2) (+ (* -1/6 (cos delta)) (* 1/120 (* (pow phi1 2) (cos delta))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (cos.f64 delta)) (patch (*.f64 (sin.f64 phi1) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (cos delta) (* (pow phi1 2) (+ (* -1/6 (cos delta)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos delta))) (* 1/120 (cos delta)))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (cos.f64 delta)) (patch (*.f64 (sin.f64 phi1) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (cos.f64 delta)) (patch (*.f64 (sin.f64 phi1) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (cos.f64 delta)) (patch (*.f64 (sin.f64 phi1) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (cos.f64 delta)) (patch (*.f64 (sin.f64 phi1) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (cos.f64 delta)) (patch (*.f64 (sin.f64 phi1) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (cos.f64 delta)) (patch (*.f64 (sin.f64 phi1) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (cos.f64 delta)) (patch (*.f64 (sin.f64 phi1) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (cos.f64 delta)) (patch (*.f64 (sin.f64 phi1) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (cos.f64 delta)) (patch (*.f64 (sin.f64 phi1) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (sin phi1) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 phi1) (cos.f64 delta)) (patch (*.f64 (sin.f64 phi1) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* -1/2 (* (pow delta 2) (sin phi1)))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 phi1) (cos.f64 delta)) (patch (*.f64 (sin.f64 phi1) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* (pow delta 2) (+ (* -1/2 (sin phi1)) (* 1/24 (* (pow delta 2) (sin phi1)))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 phi1) (cos.f64 delta)) (patch (*.f64 (sin.f64 phi1) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* (pow delta 2) (+ (* -1/2 (sin phi1)) (* (pow delta 2) (+ (* -1/720 (* (pow delta 2) (sin phi1))) (* 1/24 (sin phi1))))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 phi1) (cos.f64 delta)) (patch (*.f64 (sin.f64 phi1) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 phi1) (cos.f64 delta)) (patch (*.f64 (sin.f64 phi1) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 phi1) (cos.f64 delta)) (patch (*.f64 (sin.f64 phi1) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 phi1) (cos.f64 delta)) (patch (*.f64 (sin.f64 phi1) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor inf delta) (#s(alt (*.f64 (sin.f64 phi1) (cos.f64 delta)) (patch (*.f64 (sin.f64 phi1) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 phi1) (cos.f64 delta)) (patch (*.f64 (sin.f64 phi1) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 phi1) (cos.f64 delta)) (patch (*.f64 (sin.f64 phi1) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 phi1) (cos.f64 delta)) (patch (*.f64 (sin.f64 phi1) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 phi1) (cos.f64 delta)) (patch (*.f64 (sin.f64 phi1) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (pow (sin phi1) 2))) (taylor 0 delta) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (pow (sin phi1) 2)))) (taylor 0 delta) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (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 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (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 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (taylor 0 theta) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor 0 theta) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))))) (taylor 0 theta) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (patch (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (cos phi1)) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (cos phi1) (* -1/6 (* (pow theta 2) (cos phi1))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (cos phi1) (* (pow theta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow theta 2) (cos phi1))))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (cos phi1) (* (pow theta 2) (+ (* -1/6 (cos phi1)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (cos phi1))) (* 1/120 (cos phi1)))))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (sin theta) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin theta) (* -1/2 (* (pow phi1 2) (sin theta)))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin theta) (* (pow phi1 2) (+ (* -1/2 (sin theta)) (* 1/24 (* (pow phi1 2) (sin theta)))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin theta) (* (pow phi1 2) (+ (* -1/2 (sin theta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin theta))) (* 1/24 (sin theta))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
Calls

195 calls:

TimeVariablePointExpression
9.0ms
theta
@inf
(+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- 1 (pow (sin phi1) 2))))
1.0ms
delta
@inf
(+ (* (+ (* (cos phi1) (sin delta)) (* (sin phi1) (cos delta))) (neg (sin phi1))) (cos delta))
1.0ms
delta
@-inf
(+ (* (+ (* (cos phi1) (sin delta)) (* (sin phi1) (cos delta))) (neg (sin phi1))) (cos delta))
1.0ms
phi1
@-inf
(- (cos delta) (* (cos delta) (+ (* (cos (+ phi1 phi1)) -1/2) 1/2)))
1.0ms
phi1
@inf
(+ (* (+ (* (cos phi1) (sin delta)) (* (sin phi1) (cos delta))) (neg (sin phi1))) (cos delta))

rewrite513.0ms (2.8%)

Memory
2.1MiB live, 761.2MiB allocated
Algorithm
batch-egg-rewrite
Rules
5 652×lower-fma.f32
5 642×lower-fma.f64
5 134×lower-*.f32
5 114×lower-*.f64
4 206×lower-/.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
046354
089354
1351330
22575330
010210328
Stop Event
iter limit
node limit
iter limit
Counts
26 → 409
Calls
Call 1
Inputs
(-.f64 (cos.f64 delta) (*.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)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(sin.f64 delta)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1)))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
(*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(cos.f64 delta)
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(*.f64 (sin.f64 theta) (cos.f64 phi1))
Outputs
(+.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))))
(+.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (cos.f64 delta))
(-.f64 (cos.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 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (*.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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta 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 3 binary64)) (fma.f64 (*.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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (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)))) (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.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)) (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 (+.f64 phi1 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 delta)))) (*.f64 (cos.f64 delta) #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 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))))))
(fma.f64 (cos.f64 delta) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (cos.f64 delta))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta))
(fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta) (cos.f64 delta))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (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 (cos.f64 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) (/.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 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 (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 (cos.f64 delta) #s(literal 3 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 3 binary64))) (fma.f64 (*.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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (+.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 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #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 (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 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (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 (cos.f64 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) (neg.f64 (/.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 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 (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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #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)))) (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 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 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 3 binary64)))) (neg.f64 (fma.f64 (*.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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (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 (cos.f64 delta) #s(literal 3 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 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 (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 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (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 (cos.f64 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 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (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 (cos.f64 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 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (*.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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (fma.f64 (*.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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (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 3 binary64)))) (pow.f64 (fma.f64 (*.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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 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 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta 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 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)))))
(/.f64 (+.f64 (neg.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 3 binary64))) (pow.f64 (cos.f64 delta) #s(literal 3 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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (cos.f64 delta)))))
(pow.f64 (/.f64 (fma.f64 (*.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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (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 (cos.f64 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))
(pow.f64 (/.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 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 (cos.f64 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))
(*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 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 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (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 (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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))))
(*.f64 (/.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (cos.f64 delta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) lambda1)
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) lambda1))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) lambda1)))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))))))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))))
(/.f64 (*.f64 (sin.f64 delta) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))) (sin.f64 delta)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (sin.f64 delta) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))) (sin.f64 delta))) #s(literal -2 binary64))
(*.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 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)))
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) lambda1)
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) lambda1))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) lambda1)))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)))))
(atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta))
(-.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 delta theta)) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 delta theta)) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))))
(/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #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 delta theta))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 delta theta)))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 delta theta)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))))) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) #s(literal -1 binary64))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))
(sin.f64 delta)
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) lambda1)
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.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) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.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) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.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 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.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 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) lambda1))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.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 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) lambda1)))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.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))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.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 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.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 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(-.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 delta theta)) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 delta theta)) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))))
(/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #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 delta theta))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 delta theta)))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 delta theta)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))))) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) #s(literal -1 binary64))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) lambda1)
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1)))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1)))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1)))))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) lambda1))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1)))))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1)))))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) lambda1)))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1)))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))))))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) lambda1)
(-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta)))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 2 binary64))) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 3 binary64))) (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta)))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 2 binary64))))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta)))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 2 binary64))) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) lambda1))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta)))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda1 lambda1 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) lambda1)))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) lambda1)) (*.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))) (*.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) lambda1) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) lambda1)))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta)))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) (neg.f64 (neg.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) lambda1))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))))))
(pow.f64 (/.f64 (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta)))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 2 binary64))) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) #s(literal -1 binary64))
(*.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta)))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))) lambda1)))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta)))
(/.f64 (*.f64 (sin.f64 delta) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))) (sin.f64 delta)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (sin.f64 delta) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))) (sin.f64 delta))) #s(literal -2 binary64))
(*.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 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(+.f64 (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (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 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (-.f64 #s(literal 1/2 binary64) (*.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))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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))) (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) (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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)) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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))) (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) (neg.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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 #s(literal 1/4 binary64) (+.f64 #s(literal 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 (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 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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 (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (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 (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 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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 (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/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(pow.f64 (/.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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))) (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))
(pow.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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))
(*.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) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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/4 binary64) (+.f64 #s(literal 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 (*.f64 (sin.f64 delta) (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta))) (sin.f64 delta)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (sin.f64 delta) (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta))) (sin.f64 delta))) #s(literal -2 binary64))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (cos.f64 phi1))
(/.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta))))) #s(literal -2 binary64))
(*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(*.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
(*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 delta))
(*.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta))
(*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)) (cos.f64 theta))
(*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 theta)) (cos.f64 phi1))
(cos.f64 delta)
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(+.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(+.f64 (neg.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 (cos.f64 phi1)) #s(literal 2 binary64)))
(-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (+.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (+.f64 #s(literal 1 binary64) (-.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 1 binary64) (+.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))
(fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) #s(literal 1 binary64))
(fma.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1) #s(literal 1 binary64))
(fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (+.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (+.f64 #s(literal 1 binary64) (-.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 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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(/.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 phi1 phi1)))) (+.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (+.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (*.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 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 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 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 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (+.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (+.f64 #s(literal 1 binary64) (-.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 6 binary64)))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (+.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (+.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (*.f64 (+.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (neg.f64 (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (+.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))))) (neg.f64 (neg.f64 (+.f64 #s(literal 1 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) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (*.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 phi1 phi1)))))))
(/.f64 (+.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) #s(literal 1 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)))))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (+.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #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 (+.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) #s(literal -1 binary64))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (+.f64 #s(literal 1 binary64) (-.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 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 phi1))))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 phi1))) #s(literal 1 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(-.f64 #s(literal 1/2 binary64) (/.f64 (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 (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal -2 binary64))
(pow.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 (neg.f64 (sin.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (sin.f64 phi1))
(*.f64 #s(literal 1 binary64) (-.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 phi1 phi1)))) #s(literal 1 binary64))
(*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)))
(*.f64 (*.f64 #s(literal 1 binary64) (sin.f64 phi1)) (sin.f64 phi1))
(*.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (sin.f64 phi1)) #s(literal 1 binary64)) (sin.f64 phi1))
(+.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1))))
(+.f64 (*.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))
(-.f64 (/.f64 (*.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 #s(literal 2 binary64) (+.f64 delta phi1)))))) (fma.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)) (neg.f64 (cos.f64 delta)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)) (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 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1))))) (/.f64 (*.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 #s(literal 2 binary64) (+.f64 delta phi1)))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1))))))
(fma.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (+.f64 delta phi1)) (cos.f64 delta))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 (+.f64 delta phi1))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (*.f64 (sin.f64 (+.f64 delta phi1)) #s(literal -1 binary64)) (sin.f64 phi1) (cos.f64 delta))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)))) (*.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 #s(literal 2 binary64) (+.f64 delta phi1))))))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)) (neg.f64 (cos.f64 delta))) (-.f64 (*.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 #s(literal 2 binary64) (+.f64 delta 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 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)))) (*.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 #s(literal 2 binary64) (+.f64 delta phi1))))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (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 (*.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 #s(literal 2 binary64) (+.f64 delta phi1)))))) (*.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)))) (*.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 #s(literal 2 binary64) (+.f64 delta phi1))))))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)) (neg.f64 (cos.f64 delta))) (-.f64 (*.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 #s(literal 2 binary64) (+.f64 delta phi1)))))) (+.f64 #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 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 delta phi1)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)) (neg.f64 (cos.f64 delta))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)))) (*.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 #s(literal 2 binary64) (+.f64 delta phi1)))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (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 (*.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 #s(literal 2 binary64) (+.f64 delta phi1)))))) (*.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1))))))))
(/.f64 (neg.f64 (-.f64 (*.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 #s(literal 2 binary64) (+.f64 delta phi1)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (neg.f64 (fma.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)) (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 (-.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 #s(literal 2 binary64) (+.f64 delta phi1))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)))))
(/.f64 (-.f64 (*.f64 (*.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 #s(literal 2 binary64) (+.f64 delta phi1)))))) (fma.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)) (neg.f64 (cos.f64 delta)))) (*.f64 (fma.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)) (neg.f64 (cos.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (fma.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)) (neg.f64 (cos.f64 delta))) (fma.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)) (neg.f64 (cos.f64 delta)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)))) (*.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 #s(literal 2 binary64) (+.f64 delta phi1))))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.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 #s(literal 2 binary64) (+.f64 delta phi1)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (neg.f64 (neg.f64 (fma.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)) (neg.f64 (cos.f64 delta))))))
(/.f64 (neg.f64 (-.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 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 delta phi1)))))))) (neg.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1))))))
(pow.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)))) (*.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 #s(literal 2 binary64) (+.f64 delta phi1))))))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)) (neg.f64 (cos.f64 delta))) (-.f64 (*.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 #s(literal 2 binary64) (+.f64 delta phi1)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (+.f64 delta phi1)) (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 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)))) (*.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 #s(literal 2 binary64) (+.f64 delta phi1)))))))))
(*.f64 (-.f64 (*.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 #s(literal 2 binary64) (+.f64 delta 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 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)) (neg.f64 (cos.f64 delta)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))))
(/.f64 (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta))) #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta))))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta))))) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) #s(literal -1 binary64))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(*.f64 (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64))
(+.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (cos.f64 delta))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (cos.f64 delta)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (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 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (-.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (cos.f64 delta))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (*.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal -1 binary64)) (sin.f64 phi1) (cos.f64 delta))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)) (pow.f64 (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 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (cos.f64 delta))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #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 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (cos.f64 delta)))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.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 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (cos.f64 delta)))) (*.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (cos.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (cos.f64 delta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (cos.f64 delta)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (neg.f64 (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (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 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(pow.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #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))
(*.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #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 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #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 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (cos.f64 delta)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta)))))
(/.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))) #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))))) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta)))) #s(literal -1 binary64))
(*.f64 (sin.f64 theta) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(*.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))) #s(literal 1/2 binary64))

simplify535.0ms (2.9%)

Memory
11.4MiB live, 997.2MiB allocated
Algorithm
egg-herbie
Rules
15 454×lower-fma.f64
15 454×lower-fma.f32
8 554×lower-*.f64
8 554×lower-*.f32
3 844×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
057614844
1198314193
2672014096
0828213486
Stop Event
iter limit
node limit
Counts
780 → 769
Calls
Call 1
Inputs
(- 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 (* (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 (cos (* 2 phi1))))
(- (+ 1/2 (* (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))))))))) (* -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))))))
(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 (neg (* -2 phi1)))))))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (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 (* (sin delta) (sin theta)) (cos delta))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (sin delta) (sin theta)) (cos delta)) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (sin delta) (sin theta)) (cos delta)) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (sin delta) (sin theta)) (cos delta)) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (sin theta)) (cos delta)) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (sin theta)) (cos delta)) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (sin theta)) (cos delta)) lambda1)) 1)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(* 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))
(* 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
(* delta (+ 1 (* -1/6 (pow delta 2))))
(* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6))))
(* delta (+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/120 (* -1/5040 (pow delta 2)))) 1/6))))
(sin delta)
(sin delta)
(sin delta)
(sin delta)
(sin delta)
(sin delta)
(sin delta)
(sin delta)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(* 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) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(* 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)))
(* 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)))
(* (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)))
(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)))))
(* delta (* (cos phi1) (cos theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* (cos phi1) (cos theta))))
(* delta (+ (* (cos phi1) (cos theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (cos theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (cos theta))))))))
(* delta (+ (* (cos phi1) (cos theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* 1/120 (* (cos phi1) (cos theta)))))))))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos theta) (sin delta))
(+ (* -1/2 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* (cos theta) (sin delta)))
(+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* 1/24 (* (pow phi1 2) (* (cos theta) (sin delta)))))))
(+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* 1/24 (* (cos theta) (sin delta))))))))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (sin delta))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))
(+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta)))))))
(+ (* (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 phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (* 1/12 (* (cos theta) (sin delta)))))))))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (+ (* 1/12 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/144 (* (cos theta) (sin delta))) (+ (* -1/240 (* (cos theta) (sin delta))) (+ (* -1/720 (* (cos theta) (sin delta))) (* -1/5040 (* (cos theta) (sin delta))))))))))))))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* delta (* (cos phi1) (* (cos theta) (sin phi1))))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* (cos phi1) (* (cos theta) (sin phi1)))))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/120 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1)))))))))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/120 (* (cos phi1) (* (cos theta) (sin phi1))))))))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (sin delta) (sin phi1)))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))
(+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
1
(+ 1 (* -1/2 (pow delta 2)))
(+ 1 (* (pow delta 2) (- (* 1/24 (pow delta 2)) 1/2)))
(+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/24 (* -1/720 (pow delta 2)))) 1/2)))
(cos delta)
(cos delta)
(cos delta)
(cos delta)
(cos delta)
(cos delta)
(cos delta)
(cos 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 (* phi1 (sin delta))))
(+ (cos delta) (* phi1 (+ (* -1 (sin delta)) (* -1 (* phi1 (cos delta))))))
(+ (cos delta) (* phi1 (+ (* -1 (sin delta)) (* phi1 (+ (* -1 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (sin delta)) (* -1/6 (sin delta))))))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(+ 1 (* -1 (pow (sin phi1) 2)))
(+ 1 (+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (* -1 (pow (sin phi1) 2))))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* delta (- (* 1/2 (pow (sin phi1) 2)) 1/2))))))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* delta (- (+ (* 1/6 (* delta (* (cos phi1) (sin phi1)))) (* 1/2 (pow (sin phi1) 2))) 1/2))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(* phi1 (cos delta))
(* phi1 (+ (cos delta) (* -1/6 (* (pow phi1 2) (cos delta)))))
(* phi1 (+ (cos delta) (* (pow phi1 2) (+ (* -1/6 (cos delta)) (* 1/120 (* (pow phi1 2) (cos delta)))))))
(* phi1 (+ (cos delta) (* (pow phi1 2) (+ (* -1/6 (cos delta)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos delta))) (* 1/120 (cos delta))))))))
(* (cos delta) (sin phi1))
(* (cos delta) (sin phi1))
(* (cos delta) (sin phi1))
(* (cos delta) (sin phi1))
(* (cos delta) (sin phi1))
(* (cos delta) (sin phi1))
(* (cos delta) (sin phi1))
(* (cos delta) (sin phi1))
(sin phi1)
(+ (sin phi1) (* -1/2 (* (pow delta 2) (sin phi1))))
(+ (sin phi1) (* (pow delta 2) (+ (* -1/2 (sin phi1)) (* 1/24 (* (pow delta 2) (sin phi1))))))
(+ (sin phi1) (* (pow delta 2) (+ (* -1/2 (sin phi1)) (* (pow delta 2) (+ (* -1/720 (* (pow delta 2) (sin phi1))) (* 1/24 (sin phi1)))))))
(* (cos delta) (sin phi1))
(* (cos delta) (sin phi1))
(* (cos delta) (sin phi1))
(* (cos delta) (sin phi1))
(* (cos delta) (sin phi1))
(* (cos delta) (sin phi1))
(* (cos delta) (sin phi1))
(* (cos 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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (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))) (* -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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(* theta (cos phi1))
(* theta (+ (cos phi1) (* -1/6 (* (pow theta 2) (cos phi1)))))
(* theta (+ (cos phi1) (* (pow theta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow theta 2) (cos phi1)))))))
(* theta (+ (cos phi1) (* (pow theta 2) (+ (* -1/6 (cos phi1)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(sin theta)
(+ (sin theta) (* -1/2 (* (pow phi1 2) (sin theta))))
(+ (sin theta) (* (pow phi1 2) (+ (* -1/2 (sin theta)) (* 1/24 (* (pow phi1 2) (sin theta))))))
(+ (sin theta) (* (pow phi1 2) (+ (* -1/2 (sin theta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin theta))) (* 1/24 (sin theta)))))))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
Outputs
(- 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -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 delta delta) (-.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(- (+ 1/2 (* (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 (cos (* 2 phi1))))
(fma.f64 (*.f64 delta delta) (fma.f64 delta (*.f64 delta (+.f64 #s(literal 1/48 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/48 binary64)))) (-.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(- (+ 1/2 (* (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))))))))) (* -1/2 (cos (* 2 phi1))))
(fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (fma.f64 (+.f64 #s(literal 1/1440 binary64) (*.f64 #s(literal 1/1440 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))))) (*.f64 delta (neg.f64 delta)) (+.f64 #s(literal 1/48 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/48 binary64)))) (-.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* (pow phi1 2) (cos delta))))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)) (cos.f64 delta))
(+ (cos delta) (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta))))
(fma.f64 (*.f64 phi1 phi1) (*.f64 (cos.f64 delta) (fma.f64 phi1 (*.f64 phi1 #s(literal 1/3 binary64)) #s(literal -1 binary64))) (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 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) (*.f64 (cos.f64 delta) (fma.f64 phi1 (*.f64 phi1 #s(literal -2/45 binary64)) #s(literal 1/3 binary64))) (neg.f64 (cos.f64 delta))) (cos.f64 delta))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)) (neg.f64 lambda1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) theta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (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 theta (fma.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 #s(literal 1/120 binary64) (*.f64 theta theta) #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(*.f64 theta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 theta theta))) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* delta (* (cos phi1) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 delta (sin.f64 theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(*.f64 delta (*.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (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 delta (fma.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 delta (*.f64 delta #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(*.f64 delta (fma.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 (*.f64 delta delta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(fma.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))) (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (sin delta) (sin theta)) (cos delta)) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (sin delta) (sin theta)) (cos delta)) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (sin delta) (sin theta)) (cos delta)) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (sin theta)) (cos delta)) lambda1)) 1)))
(neg.f64 (*.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (sin theta)) (cos delta)) lambda1)) 1)))
(neg.f64 (*.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (sin theta)) (cos delta)) lambda1)) 1)))
(neg.f64 (*.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) lambda1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(atan2 (* (sin delta) (sin theta)) (cos delta))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(*.f64 delta (*.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)) (sin.f64 theta)))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(*.f64 delta (fma.f64 (*.f64 delta (*.f64 delta (sin.f64 theta))) (fma.f64 delta (*.f64 delta #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) (sin.f64 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))))))))
(*.f64 delta (fma.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)) (sin.f64 theta) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 delta (*.f64 delta (sin.f64 theta))) (fma.f64 (*.f64 delta delta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (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 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(*.f64 theta (fma.f64 (*.f64 theta theta) (*.f64 (sin.f64 delta) (fma.f64 #s(literal 1/120 binary64) (*.f64 theta theta) #s(literal -1/6 binary64))) (sin.f64 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))))))))
(*.f64 theta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (sin.f64 delta) (*.f64 theta theta)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
delta
(* delta (+ 1 (* -1/6 (pow delta 2))))
(fma.f64 delta (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) delta)
(* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6))))
(fma.f64 delta (*.f64 delta (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) delta)
(* delta (+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/120 (* -1/5040 (pow delta 2)))) 1/6))))
(fma.f64 (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 (*.f64 delta delta)) delta)
(sin delta)
(sin.f64 delta)
(sin delta)
(sin.f64 delta)
(sin delta)
(sin.f64 delta)
(sin delta)
(sin.f64 delta)
(sin delta)
(sin.f64 delta)
(sin delta)
(sin.f64 delta)
(sin delta)
(sin.f64 delta)
(sin delta)
(sin.f64 delta)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))) lambda1)) 1)))
(neg.f64 (*.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))) lambda1)) 1)))
(neg.f64 (*.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))) lambda1)) 1)))
(neg.f64 (*.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) lambda1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(* theta (sin delta))
(*.f64 (sin.f64 delta) theta)
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(*.f64 theta (fma.f64 (*.f64 theta theta) (*.f64 (sin.f64 delta) (fma.f64 #s(literal 1/120 binary64) (*.f64 theta theta) #s(literal -1/6 binary64))) (sin.f64 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))))))))
(*.f64 theta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (sin.f64 delta) (*.f64 theta theta)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(*.f64 delta (*.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)) (sin.f64 theta)))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(*.f64 delta (fma.f64 (*.f64 delta (*.f64 delta (sin.f64 theta))) (fma.f64 delta (*.f64 delta #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) (sin.f64 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))))))))
(*.f64 delta (fma.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)) (sin.f64 theta) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 delta (*.f64 delta (sin.f64 theta))) (fma.f64 (*.f64 delta delta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) lambda1)) (neg.f64 lambda1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1)))
(neg.f64 (*.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1)))
(neg.f64 (*.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1)))
(neg.f64 (*.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(* delta (* (cos phi1) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 delta (sin.f64 theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(*.f64 delta (*.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (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 delta (fma.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 delta (*.f64 delta #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(*.f64 delta (fma.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 (*.f64 delta delta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) theta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (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 theta (fma.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 #s(literal 1/120 binary64) (*.f64 theta theta) #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(*.f64 theta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 theta theta))) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(fma.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))) (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(*.f64 phi1 (*.f64 phi1 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/3 binary64) #s(literal 1 binary64))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(*.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) (fma.f64 phi1 (*.f64 phi1 #s(literal 2/45 binary64)) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(*.f64 (*.f64 phi1 phi1) (fma.f64 phi1 (*.f64 phi1 (fma.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/315 binary64) #s(literal 2/45 binary64)) #s(literal -1/3 binary64))) #s(literal 1 binary64)))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(* delta (* (cos phi1) (cos theta)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) delta))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* (cos phi1) (cos theta))))
(*.f64 delta (*.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(* delta (+ (* (cos phi1) (cos theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (cos theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (cos theta))))))))
(*.f64 delta (fma.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (fma.f64 delta (*.f64 delta #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(* delta (+ (* (cos phi1) (cos theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* 1/120 (* (cos phi1) (cos theta)))))))))
(*.f64 delta (fma.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (*.f64 delta (*.f64 delta (cos.f64 phi1))) (cos.f64 theta)) (fma.f64 (*.f64 delta delta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* (cos theta) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* (cos theta) (sin delta)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* 1/24 (* (pow phi1 2) (* (cos theta) (sin delta)))))))
(fma.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* 1/24 (* (cos theta) (sin delta))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))) (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1))))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta)))))))
(fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 #s(literal 1/24 binary64) (*.f64 theta theta) #s(literal -1/2 binary64)))))
(+ (* (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 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 theta theta))) (fma.f64 #s(literal -1/720 binary64) (*.f64 theta theta) #s(literal 1/24 binary64)))))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))
(*.f64 phi1 (fma.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (* 1/12 (* (cos theta) (sin delta)))))))))))
(*.f64 phi1 (fma.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) #s(literal 2/15 binary64)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)))) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (+ (* 1/12 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/144 (* (cos theta) (sin delta))) (+ (* -1/240 (* (cos theta) (sin delta))) (+ (* -1/720 (* (cos theta) (sin delta))) (* -1/5040 (* (cos theta) (sin delta))))))))))))))))
(*.f64 phi1 (fma.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) #s(literal 2/15 binary64) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) #s(literal -4/315 binary64)))) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)))) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* delta (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 phi1) delta))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* (cos phi1) (* (cos theta) (sin phi1)))))
(*.f64 delta (*.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/120 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1)))))))))
(*.f64 delta (fma.f64 (*.f64 delta (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 phi1) delta))) (fma.f64 delta (*.f64 delta #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/120 (* (cos phi1) (* (cos theta) (sin phi1))))))))))
(*.f64 delta (fma.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 delta (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 phi1) delta))) (fma.f64 (*.f64 delta delta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(fma.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (fma.f64 #s(literal 1/24 binary64) (*.f64 theta theta) #s(literal -1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 theta theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (fma.f64 #s(literal -1/720 binary64) (*.f64 theta theta) #s(literal 1/24 binary64)))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow delta 2)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))
(+ 1 (* (pow delta 2) (- (* 1/24 (pow delta 2)) 1/2)))
(fma.f64 delta (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) #s(literal 1 binary64))
(+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/24 (* -1/720 (pow delta 2)))) 1/2)))
(fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(cos delta)
(cos.f64 delta)
(cos delta)
(cos.f64 delta)
(cos delta)
(cos.f64 delta)
(cos delta)
(cos.f64 delta)
(cos delta)
(cos.f64 delta)
(cos delta)
(cos.f64 delta)
(cos delta)
(cos.f64 delta)
(cos delta)
(cos.f64 delta)
1
#s(literal 1 binary64)
(+ 1 (* -1 (pow phi1 2)))
(-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))
(+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))
(fma.f64 (*.f64 phi1 phi1) (fma.f64 phi1 (*.f64 phi1 #s(literal 1/3 binary64)) #s(literal -1 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(fma.f64 (*.f64 phi1 phi1) (fma.f64 phi1 (*.f64 phi1 (fma.f64 phi1 (*.f64 phi1 #s(literal -2/45 binary64)) #s(literal 1/3 binary64))) #s(literal -1 binary64)) #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 phi1 (*.f64 phi1 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/3 binary64) #s(literal 1 binary64))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(*.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) (fma.f64 phi1 (*.f64 phi1 #s(literal 2/45 binary64)) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(*.f64 (*.f64 phi1 phi1) (fma.f64 phi1 (*.f64 phi1 (fma.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/315 binary64) #s(literal 2/45 binary64)) #s(literal -1/3 binary64))) #s(literal 1 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))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (sin delta))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (sin.f64 delta)))
(+ (cos delta) (* phi1 (+ (* -1 (sin delta)) (* -1 (* phi1 (cos delta))))))
(fma.f64 phi1 (neg.f64 (sin.f64 delta)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)) (cos.f64 delta)))
(+ (cos delta) (* phi1 (+ (* -1 (sin delta)) (* phi1 (+ (* -1 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (sin delta)) (* -1/6 (sin delta))))))))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 phi1 (*.f64 (sin.f64 delta) #s(literal 2/3 binary64)) (neg.f64 (cos.f64 delta))) (neg.f64 (sin.f64 delta))) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.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) (sin phi1)))) (* -1 (pow (sin phi1) 2))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 delta (cos.f64 phi1) (sin.f64 phi1)) #s(literal 1 binary64))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* delta (- (* 1/2 (pow (sin phi1) 2)) 1/2))))))
(+.f64 #s(literal 1 binary64) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 delta (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)))))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (sin phi1))) (* delta (- (+ (* 1/6 (* delta (* (cos phi1) (sin phi1)))) (* 1/2 (pow (sin phi1) 2))) 1/2))))))
(+.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 delta (cos.f64 phi1) (sin.f64 phi1)) #s(literal 1 binary64)) (*.f64 (*.f64 delta delta) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 delta #s(literal 1/6 binary64)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(* phi1 (cos delta))
(*.f64 phi1 (cos.f64 delta))
(* phi1 (+ (cos delta) (* -1/6 (* (pow phi1 2) (cos delta)))))
(*.f64 phi1 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 delta)))
(* phi1 (+ (cos delta) (* (pow phi1 2) (+ (* -1/6 (cos delta)) (* 1/120 (* (pow phi1 2) (cos delta)))))))
(*.f64 phi1 (fma.f64 (*.f64 phi1 phi1) (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (cos.f64 delta)))
(* phi1 (+ (cos delta) (* (pow phi1 2) (+ (* -1/6 (cos delta)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos delta))) (* 1/120 (cos delta))))))))
(*.f64 phi1 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 (*.f64 phi1 (cos.f64 delta))) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))))))
(* (cos delta) (sin phi1))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(* (cos delta) (sin phi1))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(* (cos delta) (sin phi1))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(* (cos delta) (sin phi1))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(* (cos delta) (sin phi1))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(* (cos delta) (sin phi1))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(* (cos delta) (sin phi1))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(* (cos delta) (sin phi1))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(sin phi1)
(sin.f64 phi1)
(+ (sin phi1) (* -1/2 (* (pow delta 2) (sin phi1))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 phi1))
(+ (sin phi1) (* (pow delta 2) (+ (* -1/2 (sin phi1)) (* 1/24 (* (pow delta 2) (sin phi1))))))
(fma.f64 (*.f64 delta (*.f64 delta (sin.f64 phi1))) (fma.f64 (*.f64 delta delta) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 phi1))
(+ (sin phi1) (* (pow delta 2) (+ (* -1/2 (sin phi1)) (* (pow delta 2) (+ (* -1/720 (* (pow delta 2) (sin phi1))) (* 1/24 (sin phi1)))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 phi1) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 delta (*.f64 delta (sin.f64 phi1))) (fma.f64 (*.f64 delta delta) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(* (cos delta) (sin phi1))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(* (cos delta) (sin phi1))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(* (cos delta) (sin phi1))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(* (cos delta) (sin phi1))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(* (cos delta) (sin phi1))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(* (cos delta) (sin phi1))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(* (cos delta) (sin phi1))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(* (cos delta) (sin phi1))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(+ 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 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 phi1) delta) (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 delta (-.f64 (*.f64 delta (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (-.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 delta (-.f64 (*.f64 delta (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 phi1) delta)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))
(+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))
(fma.f64 (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)) (cos.f64 delta) (*.f64 (cos.f64 theta) (neg.f64 (*.f64 phi1 (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 phi1 (fma.f64 (neg.f64 phi1) (fma.f64 phi1 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta)))) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(fma.f64 (*.f64 theta theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) #s(literal 1/2 binary64))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 theta theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (fma.f64 #s(literal -1/24 binary64) (*.f64 theta theta) #s(literal 1/2 binary64)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
(fma.f64 (*.f64 theta theta) (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 theta theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(* theta (cos phi1))
(*.f64 (cos.f64 phi1) theta)
(* theta (+ (cos phi1) (* -1/6 (* (pow theta 2) (cos phi1)))))
(*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (cos.f64 phi1)))
(* theta (+ (cos phi1) (* (pow theta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow theta 2) (cos phi1)))))))
(*.f64 theta (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 theta theta)) (fma.f64 #s(literal 1/120 binary64) (*.f64 theta theta) #s(literal -1/6 binary64)) (cos.f64 phi1)))
(* theta (+ (cos phi1) (* (pow theta 2) (+ (* -1/6 (cos phi1)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(*.f64 theta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (cos.f64 phi1) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 theta theta)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))))))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(sin theta)
(sin.f64 theta)
(+ (sin theta) (* -1/2 (* (pow phi1 2) (sin theta))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 theta))
(+ (sin theta) (* (pow phi1 2) (+ (* -1/2 (sin theta)) (* 1/24 (* (pow phi1 2) (sin theta))))))
(fma.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64))) (sin.f64 theta))
(+ (sin theta) (* (pow phi1 2) (+ (* -1/2 (sin theta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin theta))) (* 1/24 (sin theta)))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 theta) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 (*.f64 phi1 (sin.f64 theta))) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64)))))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))

eval292.0ms (1.6%)

Memory
4.9MiB live, 497.1MiB allocated
Compiler

Compiled 53 735 to 2 834 computations (94.7% saved)

prune342.0ms (1.8%)

Memory
-5.3MiB live, 612.0MiB allocated
Pruning

54 alts after pruning (51 fresh and 3 done)

PrunedKeptTotal
New1 550331 583
Fresh151833
Picked325
Done011
Total1 568541 622
Accuracy
100.0%
Counts
1 622 → 54
Alt Table
Click to see full alt table
StatusAccuracyProgram
94.3%
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) lambda1) lambda1)
30.7%
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
16.9%
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
30.7%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
25.3%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
19.4%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
14.7%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
19.8%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
39.5%
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)))))
35.9%
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
44.9%
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
99.8%
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
90.6%
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) lambda1)
83.0%
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) lambda1)
90.8%
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
87.0%
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) lambda1)
84.1%
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1)
74.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (fma.f64 delta (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) delta) (sin.f64 theta)) (cos.f64 delta)))
73.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta)))
94.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
91.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
83.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) #s(literal 1 binary64))))
83.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))))
83.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
90.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)))) (*.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 #s(literal 2 binary64) (+.f64 delta phi1))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)))))))
83.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
99.8%
(+.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)))) (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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
94.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))))
94.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 phi1) (sin.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))))))
91.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
87.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))))))
86.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
78.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
72.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
90.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 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 delta 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 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)) (neg.f64 (cos.f64 delta)))))))
86.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
78.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 1 binary64)))
76.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
72.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
80.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
84.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
76.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 delta (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) #s(literal 1 binary64))))
77.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
84.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
77.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
77.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64)))
71.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 delta)))
76.5%
(+.f64 lambda1 (atan2.f64 (*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
70.2%
(+.f64 lambda1 (atan2.f64 (*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta))) (cos.f64 delta)))
75.7%
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)))
77.1%
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
Compiler

Compiled 3 417 to 1 987 computations (41.8% saved)

simplify456.0ms (2.5%)

Memory
-6.7MiB live, 507.7MiB 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)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
cost-diff6592
(-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
cost-diff0
(sin.f64 delta)
cost-diff0
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1)))
cost-diff0
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1))))
cost-diff0
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1)
cost-diff0
(*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
cost-diff0
(*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))))
cost-diff0
(atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)))
cost-diff0
(sin.f64 theta)
cost-diff0
(*.f64 delta (sin.f64 theta))
cost-diff0
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
cost-diff0
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (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)) (cos.f64 delta)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))))
cost-diff6464
(-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))
Rules
12 516×lower-fma.f32
12 510×lower-fma.f64
4 462×lower-*.f32
4 428×lower-*.f64
1 858×lower-+.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
050549
095549
1175549
2370549
3904535
42195535
53798535
64788535
76128535
86731535
96916535
107001535
117042535
127274535
137925535
08120525
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (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)) (cos.f64 delta))))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (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
(-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))
(cos.f64 delta)
(fma.f64 (*.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)) (cos.f64 delta)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
(sin.f64 phi1)
(*.f64 (cos.f64 theta) (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))
(fma.f64 (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/2 binary64)
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
lambda1
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
(*.f64 delta (sin.f64 theta))
delta
(sin.f64 theta)
theta
(cos.f64 delta)
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)))
lambda1
(atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))
(*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))))
delta
(*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))
#s(literal -1/6 binary64)
(*.f64 delta delta)
#s(literal 1 binary64)
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(cos.f64 phi1)
phi1
(sin.f64 theta)
theta
(cos.f64 delta)
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1)
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1))))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1)))
(sin.f64 delta)
delta
(*.f64 (sin.f64 theta) (cos.f64 phi1))
(sin.f64 theta)
theta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))
(cos.f64 delta)
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1))
(*.f64 (cos.f64 theta) phi1)
(cos.f64 theta)
lambda1
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.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
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(cos.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 (+.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/2 binary64)
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(sin.f64 phi1)
(*.f64 (cos.f64 phi1) (sin.f64 delta))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (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)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (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 (sin.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 (neg.f64 phi1))))))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (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 (sin.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 (neg.f64 phi1)))))))
(*.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 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (fma.f64 (*.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)) (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 (sin.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 (neg.f64 phi1))))))
(cos.f64 delta)
(fma.f64 (*.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)) (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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
(sin.f64 phi1)
(*.f64 (cos.f64 theta) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (cos.f64 theta))
(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 (cos.f64 delta) (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))
(cos.f64 (+.f64 phi1 phi1))
(+.f64 phi1 phi1)
#s(literal -1/2 binary64)
#s(literal 1/2 binary64)
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) delta) (cos.f64 delta)))
lambda1
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
(atan2.f64 (*.f64 (sin.f64 theta) delta) (cos.f64 delta))
(*.f64 delta (sin.f64 theta))
(*.f64 (sin.f64 theta) delta)
delta
(sin.f64 theta)
theta
(cos.f64 delta)
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 delta (*.f64 (cos.f64 phi1) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))))) (cos.f64 delta)))
lambda1
(atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 delta (*.f64 (cos.f64 phi1) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))))) (cos.f64 delta))
(*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))))
(*.f64 (sin.f64 theta) (*.f64 delta (*.f64 (cos.f64 phi1) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))))
delta
(*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))))
(fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))
(fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))
#s(literal -1/6 binary64)
(*.f64 delta delta)
#s(literal 1 binary64)
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(*.f64 (sin.f64 theta) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 theta)
theta
(cos.f64 delta)
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 phi1 (cos.f64 theta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1))))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 phi1 (cos.f64 theta)))))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1)))
(*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(sin.f64 delta)
delta
(*.f64 (sin.f64 theta) (cos.f64 phi1))
(sin.f64 theta)
theta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 phi1 (cos.f64 theta))))
(cos.f64 delta)
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1))
(*.f64 (sin.f64 delta) (*.f64 phi1 (cos.f64 theta)))
(*.f64 (cos.f64 theta) phi1)
(*.f64 phi1 (cos.f64 theta))
(cos.f64 theta)
lambda1
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(*.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 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))
(-.f64 (cos.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 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(cos.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 (+.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/2 binary64)
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))
(sin.f64 phi1)
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))

localize334.0ms (1.8%)

Memory
22.0MiB live, 490.5MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy99.7%
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy99.7%
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
accuracy99.0%
(-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
accuracy78.1%
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
accuracy99.8%
(*.f64 (cos.f64 theta) phi1)
accuracy99.7%
(*.f64 (sin.f64 theta) (cos.f64 phi1))
accuracy99.7%
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1))
accuracy99.7%
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1)))
accuracy99.9%
(fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))
accuracy99.8%
(*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))))
accuracy99.7%
(*.f64 (cos.f64 phi1) (sin.f64 theta))
accuracy93.4%
(*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
accuracy100.0%
(cos.f64 delta)
accuracy100.0%
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
accuracy99.9%
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
accuracy99.8%
(*.f64 delta (sin.f64 theta))
accuracy99.7%
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
accuracy99.7%
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy99.3%
(-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))
accuracy78.1%
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
Samples
156.0ms123×1valid
82.0ms133×0valid
Compiler

Compiled 572 to 56 computations (90.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 177.0ms
ival-cos: 47.0ms (26.6% of total)
ival-mult: 45.0ms (25.5% of total)
ival-sin: 27.0ms (15.3% of total)
ival-add: 16.0ms (9.1% of total)
adjust: 16.0ms (9.1% of total)
ival-atan2: 14.0ms (7.9% of total)
ival-sub: 6.0ms (3.4% of total)
const: 5.0ms (2.8% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series87.0ms (0.5%)

Memory
-26.5MiB live, 135.1MiB allocated
Counts
29 → 864
Calls
Call 1
Inputs
#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.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) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (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 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())
#s(alt (*.f64 delta (sin.f64 theta)) (patch (*.f64 delta (sin.f64 theta)) #<representation binary64>) () ())
#s(alt (sin.f64 theta) (patch (sin.f64 theta) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())
#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())
#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())
#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())
#s(alt (sin.f64 delta) (patch (sin.f64 delta) #<representation binary64>) () ())
#s(alt (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())
#s(alt (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 theta) (sin.f64 delta)) (patch (*.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())
#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 phi1) (sin.f64 theta)) (patch (*.f64 (cos.f64 phi1) (sin.f64 theta)) #<representation binary64>) () ())
#s(alt (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 theta) phi1) (patch (*.f64 (cos.f64 theta) phi1) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())
Outputs
#s(alt (- 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (* -1/2 (cos (* 2 phi1)))) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (* -1/2 (cos (* 2 phi1)))) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (* -1/2 (cos (* 2 phi1)))) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (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 (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (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))))))) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (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))))))) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (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)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (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)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (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 (* delta (sin theta)) (cos delta)) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (sin theta)) (cos delta))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (sin theta)) (cos delta))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (sin theta)) (cos delta))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* delta (sin theta)) (cos delta)) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* delta (sin theta)) (cos delta)) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* delta (sin theta)) (cos delta)) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* delta (sin theta)) (cos delta)) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* delta (sin theta)) (cos delta)) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* delta (sin theta)) (cos delta)) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (sin theta)) (cos delta))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (sin theta)) (cos delta))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (sin theta)) (cos delta))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (sin theta)) (cos delta))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (sin theta)) (cos delta))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (sin theta)) (cos delta))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (sin theta)) (cos delta))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (sin theta)) (cos delta))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (sin theta)) (cos delta))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (sin theta)) (cos delta))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (sin theta)) (cos delta))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (sin theta)) (cos delta))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (sin theta)) (cos delta))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (sin theta)) (cos delta))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (sin theta)) (cos delta))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (sin theta)) (cos delta))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (sin theta)) (cos delta))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (sin theta)) (cos delta))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (sin theta)) (cos delta))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (sin theta)) (cos delta))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (sin theta)) (cos delta))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (sin theta)) (cos delta))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (sin theta)) (cos delta))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (sin theta)) (cos delta))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (sin theta)) (cos delta)) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (sin theta)) (cos delta)) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (sin theta)) (cos delta)) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (sin theta)) (cos delta)) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (sin theta)) (cos delta)) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (sin theta)) (cos delta)) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (sin theta)) (cos delta)) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (sin theta)) (cos delta)) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (sin theta)) (cos delta)) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (sin theta)) (cos delta)) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (sin theta)) (cos delta)) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (sin theta)) (cos delta)) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (sin theta)) (cos delta)) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (sin theta)) (cos delta)) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (sin theta)) (cos delta)) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (sin theta)) (cos delta)) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (sin theta)) (cos delta)) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (sin theta)) (cos delta)) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (sin theta)) (cos delta)) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (sin theta)) (cos delta)) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (sin theta)) (cos delta)) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (sin theta)) (cos delta)) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (sin theta)) (cos delta)) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (sin theta)) (cos delta)) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor 0 delta) (#s(alt (*.f64 delta (sin.f64 theta)) (patch (*.f64 delta (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor 0 delta) (#s(alt (*.f64 delta (sin.f64 theta)) (patch (*.f64 delta (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor 0 delta) (#s(alt (*.f64 delta (sin.f64 theta)) (patch (*.f64 delta (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor 0 delta) (#s(alt (*.f64 delta (sin.f64 theta)) (patch (*.f64 delta (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor inf delta) (#s(alt (*.f64 delta (sin.f64 theta)) (patch (*.f64 delta (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor inf delta) (#s(alt (*.f64 delta (sin.f64 theta)) (patch (*.f64 delta (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor inf delta) (#s(alt (*.f64 delta (sin.f64 theta)) (patch (*.f64 delta (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor inf delta) (#s(alt (*.f64 delta (sin.f64 theta)) (patch (*.f64 delta (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor -inf delta) (#s(alt (*.f64 delta (sin.f64 theta)) (patch (*.f64 delta (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor -inf delta) (#s(alt (*.f64 delta (sin.f64 theta)) (patch (*.f64 delta (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor -inf delta) (#s(alt (*.f64 delta (sin.f64 theta)) (patch (*.f64 delta (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor -inf delta) (#s(alt (*.f64 delta (sin.f64 theta)) (patch (*.f64 delta (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta theta) (taylor 0 theta) (#s(alt (*.f64 delta (sin.f64 theta)) (patch (*.f64 delta (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ delta (* -1/6 (* delta (pow theta 2))))) (taylor 0 theta) (#s(alt (*.f64 delta (sin.f64 theta)) (patch (*.f64 delta (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ delta (* (pow theta 2) (+ (* -1/6 delta) (* 1/120 (* delta (pow theta 2))))))) (taylor 0 theta) (#s(alt (*.f64 delta (sin.f64 theta)) (patch (*.f64 delta (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ delta (* (pow theta 2) (+ (* -1/6 delta) (* (pow theta 2) (+ (* -1/5040 (* delta (pow theta 2))) (* 1/120 delta))))))) (taylor 0 theta) (#s(alt (*.f64 delta (sin.f64 theta)) (patch (*.f64 delta (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor inf theta) (#s(alt (*.f64 delta (sin.f64 theta)) (patch (*.f64 delta (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor inf theta) (#s(alt (*.f64 delta (sin.f64 theta)) (patch (*.f64 delta (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor inf theta) (#s(alt (*.f64 delta (sin.f64 theta)) (patch (*.f64 delta (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor inf theta) (#s(alt (*.f64 delta (sin.f64 theta)) (patch (*.f64 delta (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor -inf theta) (#s(alt (*.f64 delta (sin.f64 theta)) (patch (*.f64 delta (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor -inf theta) (#s(alt (*.f64 delta (sin.f64 theta)) (patch (*.f64 delta (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor -inf theta) (#s(alt (*.f64 delta (sin.f64 theta)) (patch (*.f64 delta (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor -inf theta) (#s(alt (*.f64 delta (sin.f64 theta)) (patch (*.f64 delta (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt theta (taylor 0 theta) (#s(alt (sin.f64 theta) (patch (sin.f64 theta) #<representation binary64>) () ())) ())
#s(alt (* theta (+ 1 (* -1/6 (pow theta 2)))) (taylor 0 theta) (#s(alt (sin.f64 theta) (patch (sin.f64 theta) #<representation binary64>) () ())) ())
#s(alt (* theta (+ 1 (* (pow theta 2) (- (* 1/120 (pow theta 2)) 1/6)))) (taylor 0 theta) (#s(alt (sin.f64 theta) (patch (sin.f64 theta) #<representation binary64>) () ())) ())
#s(alt (* theta (+ 1 (* (pow theta 2) (- (* (pow theta 2) (+ 1/120 (* -1/5040 (pow theta 2)))) 1/6)))) (taylor 0 theta) (#s(alt (sin.f64 theta) (patch (sin.f64 theta) #<representation binary64>) () ())) ())
#s(alt (sin theta) (taylor inf theta) (#s(alt (sin.f64 theta) (patch (sin.f64 theta) #<representation binary64>) () ())) ())
#s(alt (sin theta) (taylor inf theta) (#s(alt (sin.f64 theta) (patch (sin.f64 theta) #<representation binary64>) () ())) ())
#s(alt (sin theta) (taylor inf theta) (#s(alt (sin.f64 theta) (patch (sin.f64 theta) #<representation binary64>) () ())) ())
#s(alt (sin theta) (taylor inf theta) (#s(alt (sin.f64 theta) (patch (sin.f64 theta) #<representation binary64>) () ())) ())
#s(alt (sin theta) (taylor -inf theta) (#s(alt (sin.f64 theta) (patch (sin.f64 theta) #<representation binary64>) () ())) ())
#s(alt (sin theta) (taylor -inf theta) (#s(alt (sin.f64 theta) (patch (sin.f64 theta) #<representation binary64>) () ())) ())
#s(alt (sin theta) (taylor -inf theta) (#s(alt (sin.f64 theta) (patch (sin.f64 theta) #<representation binary64>) () ())) ())
#s(alt (sin theta) (taylor -inf theta) (#s(alt (sin.f64 theta) (patch (sin.f64 theta) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta)) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta)) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta)) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta)) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta)) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta)) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta)) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta)) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) (patch (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (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 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (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 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (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 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (* (pow delta 3) (* (cos phi1) (sin theta)))) (taylor inf delta) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 3) (+ (* -1/6 (* (cos phi1) (sin theta))) (/ (* (cos phi1) (sin theta)) (pow delta 2)))) (taylor inf delta) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 3) (+ (* -1/6 (* (cos phi1) (sin theta))) (/ (* (cos phi1) (sin theta)) (pow delta 2)))) (taylor inf delta) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 3) (+ (* -1/6 (* (cos phi1) (sin theta))) (/ (* (cos phi1) (sin theta)) (pow delta 2)))) (taylor inf delta) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (* (pow delta 3) (* (cos phi1) (sin theta)))) (taylor -inf delta) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow delta 3) (+ (* -1 (/ (* (cos phi1) (sin theta)) (pow delta 2))) (* 1/6 (* (cos phi1) (sin theta)))))) (taylor -inf delta) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow delta 3) (+ (* -1 (/ (* (cos phi1) (sin theta)) (pow delta 2))) (* 1/6 (* (cos phi1) (sin theta)))))) (taylor -inf delta) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow delta 3) (+ (* -1 (/ (* (cos phi1) (sin theta)) (pow delta 2))) (* 1/6 (* (cos phi1) (sin theta)))))) (taylor -inf delta) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))) (taylor 0 phi1) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* delta (* (pow phi1 2) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))) (* delta (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (taylor 0 phi1) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))) (* (pow phi1 2) (+ (* -1/2 (* delta (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (* 1/24 (* delta (* (pow phi1 2) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))))))) (taylor 0 phi1) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))) (* (pow phi1 2) (+ (* -1/2 (* delta (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (* (pow phi1 2) (+ (* -1/720 (* delta (* (pow phi1 2) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))) (* 1/24 (* delta (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))))))) (taylor 0 phi1) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (taylor inf phi1) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (taylor inf phi1) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (taylor inf phi1) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (taylor inf phi1) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (taylor -inf phi1) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (taylor -inf phi1) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (taylor -inf phi1) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (taylor -inf phi1) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (* theta (* (cos phi1) (+ 1 (* -1/6 (pow delta 2)))))) (taylor 0 theta) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* -1/6 (* delta (* (pow theta 2) (* (cos phi1) (+ 1 (* -1/6 (pow delta 2))))))) (* delta (* (cos phi1) (+ 1 (* -1/6 (pow delta 2))))))) (taylor 0 theta) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* delta (* (cos phi1) (+ 1 (* -1/6 (pow delta 2))))) (* (pow theta 2) (+ (* -1/6 (* delta (* (cos phi1) (+ 1 (* -1/6 (pow delta 2)))))) (* 1/120 (* delta (* (pow theta 2) (* (cos phi1) (+ 1 (* -1/6 (pow delta 2))))))))))) (taylor 0 theta) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* delta (* (cos phi1) (+ 1 (* -1/6 (pow delta 2))))) (* (pow theta 2) (+ (* -1/6 (* delta (* (cos phi1) (+ 1 (* -1/6 (pow delta 2)))))) (* (pow theta 2) (+ (* -1/5040 (* delta (* (pow theta 2) (* (cos phi1) (+ 1 (* -1/6 (pow delta 2))))))) (* 1/120 (* delta (* (cos phi1) (+ 1 (* -1/6 (pow delta 2)))))))))))) (taylor 0 theta) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (taylor inf theta) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (taylor inf theta) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (taylor inf theta) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (taylor inf theta) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (taylor -inf theta) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (taylor -inf theta) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (taylor -inf theta) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (taylor -inf theta) (#s(alt (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (patch (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor 0 delta) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (taylor inf delta) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (/ (* (cos phi1) (sin theta)) (pow delta 2)))) (taylor inf delta) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (/ (* (cos phi1) (sin theta)) (pow delta 2)))) (taylor inf delta) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (/ (* (cos phi1) (sin theta)) (pow delta 2)))) (taylor inf delta) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (taylor -inf delta) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (/ (* (cos phi1) (sin theta)) (pow delta 2)))) (taylor -inf delta) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (/ (* (cos phi1) (sin theta)) (pow delta 2)))) (taylor -inf delta) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (/ (* (cos phi1) (sin theta)) (pow delta 2)))) (taylor -inf delta) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))) (taylor 0 phi1) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))) (taylor 0 phi1) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))) (* (pow phi1 2) (+ (* -1/2 (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))) (* 1/24 (* (pow phi1 2) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))))) (taylor 0 phi1) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))) (* (pow phi1 2) (+ (* -1/2 (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (* 1/24 (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))))))) (taylor 0 phi1) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))) (taylor inf phi1) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))) (taylor inf phi1) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))) (taylor inf phi1) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))) (taylor inf phi1) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))) (taylor -inf phi1) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))) (taylor -inf phi1) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))) (taylor -inf phi1) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))) (taylor -inf phi1) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (+ 1 (* -1/6 (pow delta 2))))) (taylor 0 theta) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (+ 1 (* -1/6 (pow delta 2)))))) (* (cos phi1) (+ 1 (* -1/6 (pow delta 2)))))) (taylor 0 theta) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (+ 1 (* -1/6 (pow delta 2)))) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (+ 1 (* -1/6 (pow delta 2))))) (* 1/120 (* (pow theta 2) (* (cos phi1) (+ 1 (* -1/6 (pow delta 2)))))))))) (taylor 0 theta) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (+ 1 (* -1/6 (pow delta 2)))) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (+ 1 (* -1/6 (pow delta 2))))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (+ 1 (* -1/6 (pow delta 2)))))) (* 1/120 (* (cos phi1) (+ 1 (* -1/6 (pow delta 2))))))))))) (taylor 0 theta) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))) (taylor inf theta) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))) (taylor inf theta) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))) (taylor inf theta) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))) (taylor inf theta) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))) (taylor -inf theta) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))) (taylor -inf theta) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))) (taylor -inf theta) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))) (taylor -inf theta) (#s(alt (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (patch (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor 0 delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor 0 delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor 0 delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor 0 delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor 0 theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor 0 theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor 0 theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor 0 theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) (patch (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt delta (taylor 0 delta) (#s(alt (sin.f64 delta) (patch (sin.f64 delta) #<representation binary64>) () ())) ())
#s(alt (* delta (+ 1 (* -1/6 (pow delta 2)))) (taylor 0 delta) (#s(alt (sin.f64 delta) (patch (sin.f64 delta) #<representation binary64>) () ())) ())
#s(alt (* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)))) (taylor 0 delta) (#s(alt (sin.f64 delta) (patch (sin.f64 delta) #<representation binary64>) () ())) ())
#s(alt (* delta (+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/120 (* -1/5040 (pow delta 2)))) 1/6)))) (taylor 0 delta) (#s(alt (sin.f64 delta) (patch (sin.f64 delta) #<representation binary64>) () ())) ())
#s(alt (sin delta) (taylor inf delta) (#s(alt (sin.f64 delta) (patch (sin.f64 delta) #<representation binary64>) () ())) ())
#s(alt (sin delta) (taylor inf delta) (#s(alt (sin.f64 delta) (patch (sin.f64 delta) #<representation binary64>) () ())) ())
#s(alt (sin delta) (taylor inf delta) (#s(alt (sin.f64 delta) (patch (sin.f64 delta) #<representation binary64>) () ())) ())
#s(alt (sin delta) (taylor inf delta) (#s(alt (sin.f64 delta) (patch (sin.f64 delta) #<representation binary64>) () ())) ())
#s(alt (sin delta) (taylor -inf delta) (#s(alt (sin.f64 delta) (patch (sin.f64 delta) #<representation binary64>) () ())) ())
#s(alt (sin delta) (taylor -inf delta) (#s(alt (sin.f64 delta) (patch (sin.f64 delta) #<representation binary64>) () ())) ())
#s(alt (sin delta) (taylor -inf delta) (#s(alt (sin.f64 delta) (patch (sin.f64 delta) #<representation binary64>) () ())) ())
#s(alt (sin delta) (taylor -inf delta) (#s(alt (sin.f64 delta) (patch (sin.f64 delta) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (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 (cos (* 2 phi1)))) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (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))))))))) (* -1/2 (cos (* 2 phi1)))) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 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 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.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)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.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)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor 0 theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor 0 delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (patch (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (pow phi1 2) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 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 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 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 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 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 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 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 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<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 (* phi1 (cos theta)) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (+ (* -1/6 (cos theta)) (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (+ (* -1/6 (cos theta)) (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (+ (* 1/12 (cos theta)) (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta))))))))))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi1)) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* (cos phi1) (sin phi1))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin phi1))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin phi1))))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/24 (* (cos phi1) (sin phi1)))))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow delta 2))) (taylor 0 delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow delta 2) (- (* 1/24 (pow delta 2)) 1/2))) (taylor 0 delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/24 (* -1/720 (pow delta 2)))) 1/2))) (taylor 0 delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor inf delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor inf delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor inf delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor inf delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor -inf delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor -inf delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor -inf delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor -inf delta) (#s(alt (cos.f64 delta) (patch (cos.f64 delta) #<representation binary64>) () ())) ())
#s(alt (sin theta) (taylor 0 phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 theta)) (patch (*.f64 (cos.f64 phi1) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (+ (sin theta) (* -1/2 (* (pow phi1 2) (sin theta)))) (taylor 0 phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 theta)) (patch (*.f64 (cos.f64 phi1) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (+ (sin theta) (* (pow phi1 2) (+ (* -1/2 (sin theta)) (* 1/24 (* (pow phi1 2) (sin theta)))))) (taylor 0 phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 theta)) (patch (*.f64 (cos.f64 phi1) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (+ (sin theta) (* (pow phi1 2) (+ (* -1/2 (sin theta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin theta))) (* 1/24 (sin theta))))))) (taylor 0 phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 theta)) (patch (*.f64 (cos.f64 phi1) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 theta)) (patch (*.f64 (cos.f64 phi1) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 theta)) (patch (*.f64 (cos.f64 phi1) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 theta)) (patch (*.f64 (cos.f64 phi1) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 theta)) (patch (*.f64 (cos.f64 phi1) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor -inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 theta)) (patch (*.f64 (cos.f64 phi1) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor -inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 theta)) (patch (*.f64 (cos.f64 phi1) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor -inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 theta)) (patch (*.f64 (cos.f64 phi1) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor -inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 theta)) (patch (*.f64 (cos.f64 phi1) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* theta (cos phi1)) (taylor 0 theta) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 theta)) (patch (*.f64 (cos.f64 phi1) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (cos phi1) (* -1/6 (* (pow theta 2) (cos phi1))))) (taylor 0 theta) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 theta)) (patch (*.f64 (cos.f64 phi1) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (cos phi1) (* (pow theta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow theta 2) (cos phi1))))))) (taylor 0 theta) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 theta)) (patch (*.f64 (cos.f64 phi1) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (cos phi1) (* (pow theta 2) (+ (* -1/6 (cos phi1)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (cos phi1))) (* 1/120 (cos phi1)))))))) (taylor 0 theta) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 theta)) (patch (*.f64 (cos.f64 phi1) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 theta)) (patch (*.f64 (cos.f64 phi1) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 theta)) (patch (*.f64 (cos.f64 phi1) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 theta)) (patch (*.f64 (cos.f64 phi1) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 theta)) (patch (*.f64 (cos.f64 phi1) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 theta)) (patch (*.f64 (cos.f64 phi1) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 theta)) (patch (*.f64 (cos.f64 phi1) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 theta)) (patch (*.f64 (cos.f64 phi1) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 theta)) (patch (*.f64 (cos.f64 phi1) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 delta) (#s(alt (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/6 (pow delta 2))) (taylor 0 delta) (#s(alt (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/6 (pow delta 2))) (taylor 0 delta) (#s(alt (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/6 (pow delta 2))) (taylor 0 delta) (#s(alt (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow delta 2)) (taylor inf delta) (#s(alt (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 2) (- (/ 1 (pow delta 2)) 1/6)) (taylor inf delta) (#s(alt (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 2) (- (/ 1 (pow delta 2)) 1/6)) (taylor inf delta) (#s(alt (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 2) (- (/ 1 (pow delta 2)) 1/6)) (taylor inf delta) (#s(alt (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow delta 2)) (taylor -inf delta) (#s(alt (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 2) (- (/ 1 (pow delta 2)) 1/6)) (taylor -inf delta) (#s(alt (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 2) (- (/ 1 (pow delta 2)) 1/6)) (taylor -inf delta) (#s(alt (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 2) (- (/ 1 (pow delta 2)) 1/6)) (taylor -inf delta) (#s(alt (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* delta (* phi1 (cos theta))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* phi1 (cos theta)))) (* phi1 (cos theta)))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* phi1 (cos theta)) (* (pow delta 2) (+ (* -1/6 (* phi1 (cos theta))) (* 1/120 (* (pow delta 2) (* phi1 (cos theta)))))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* phi1 (cos theta)) (* (pow delta 2) (+ (* -1/6 (* phi1 (cos theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* phi1 (cos theta)))) (* 1/120 (* phi1 (cos theta))))))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (sin delta)) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* phi1 (* (pow theta 2) (sin delta)))) (* phi1 (sin delta))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (sin delta)) (* (pow theta 2) (+ (* -1/2 (* phi1 (sin delta))) (* 1/24 (* phi1 (* (pow theta 2) (sin delta))))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (sin delta)) (* (pow theta 2) (+ (* -1/2 (* phi1 (sin delta))) (* (pow theta 2) (+ (* -1/720 (* phi1 (* (pow theta 2) (sin delta)))) (* 1/24 (* phi1 (sin delta)))))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) (patch (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (cos phi1)) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (cos phi1) (* -1/6 (* (pow theta 2) (cos phi1))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (cos phi1) (* (pow theta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow theta 2) (cos phi1))))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (cos phi1) (* (pow theta 2) (+ (* -1/6 (cos phi1)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (cos phi1))) (* 1/120 (cos phi1)))))))) (taylor 0 theta) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor inf theta) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor -inf theta) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (sin theta) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin theta) (* -1/2 (* (pow phi1 2) (sin theta)))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin theta) (* (pow phi1 2) (+ (* -1/2 (sin theta)) (* 1/24 (* (pow phi1 2) (sin theta)))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin theta) (* (pow phi1 2) (+ (* -1/2 (sin theta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin theta))) (* 1/24 (sin theta))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin theta)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 theta) (cos.f64 phi1)) (patch (*.f64 (sin.f64 theta) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt phi1 (taylor 0 theta) (#s(alt (*.f64 (cos.f64 theta) phi1) (patch (*.f64 (cos.f64 theta) phi1) #<representation binary64>) () ())) ())
#s(alt (+ phi1 (* -1/2 (* phi1 (pow theta 2)))) (taylor 0 theta) (#s(alt (*.f64 (cos.f64 theta) phi1) (patch (*.f64 (cos.f64 theta) phi1) #<representation binary64>) () ())) ())
#s(alt (+ phi1 (* (pow theta 2) (+ (* -1/2 phi1) (* 1/24 (* phi1 (pow theta 2)))))) (taylor 0 theta) (#s(alt (*.f64 (cos.f64 theta) phi1) (patch (*.f64 (cos.f64 theta) phi1) #<representation binary64>) () ())) ())
#s(alt (+ phi1 (* (pow theta 2) (+ (* -1/2 phi1) (* (pow theta 2) (+ (* -1/720 (* phi1 (pow theta 2))) (* 1/24 phi1)))))) (taylor 0 theta) (#s(alt (*.f64 (cos.f64 theta) phi1) (patch (*.f64 (cos.f64 theta) phi1) #<representation binary64>) () ())) ())
#s(alt (* phi1 (cos theta)) (taylor inf theta) (#s(alt (*.f64 (cos.f64 theta) phi1) (patch (*.f64 (cos.f64 theta) phi1) #<representation binary64>) () ())) ())
#s(alt (* phi1 (cos theta)) (taylor inf theta) (#s(alt (*.f64 (cos.f64 theta) phi1) (patch (*.f64 (cos.f64 theta) phi1) #<representation binary64>) () ())) ())
#s(alt (* phi1 (cos theta)) (taylor inf theta) (#s(alt (*.f64 (cos.f64 theta) phi1) (patch (*.f64 (cos.f64 theta) phi1) #<representation binary64>) () ())) ())
#s(alt (* phi1 (cos theta)) (taylor inf theta) (#s(alt (*.f64 (cos.f64 theta) phi1) (patch (*.f64 (cos.f64 theta) phi1) #<representation binary64>) () ())) ())
#s(alt (* phi1 (cos theta)) (taylor -inf theta) (#s(alt (*.f64 (cos.f64 theta) phi1) (patch (*.f64 (cos.f64 theta) phi1) #<representation binary64>) () ())) ())
#s(alt (* phi1 (cos theta)) (taylor -inf theta) (#s(alt (*.f64 (cos.f64 theta) phi1) (patch (*.f64 (cos.f64 theta) phi1) #<representation binary64>) () ())) ())
#s(alt (* phi1 (cos theta)) (taylor -inf theta) (#s(alt (*.f64 (cos.f64 theta) phi1) (patch (*.f64 (cos.f64 theta) phi1) #<representation binary64>) () ())) ())
#s(alt (* phi1 (cos theta)) (taylor -inf theta) (#s(alt (*.f64 (cos.f64 theta) phi1) (patch (*.f64 (cos.f64 theta) phi1) #<representation binary64>) () ())) ())
#s(alt (* phi1 (cos theta)) (taylor 0 phi1) (#s(alt (*.f64 (cos.f64 theta) phi1) (patch (*.f64 (cos.f64 theta) phi1) #<representation binary64>) () ())) ())
#s(alt (* phi1 (cos theta)) (taylor 0 phi1) (#s(alt (*.f64 (cos.f64 theta) phi1) (patch (*.f64 (cos.f64 theta) phi1) #<representation binary64>) () ())) ())
#s(alt (* phi1 (cos theta)) (taylor 0 phi1) (#s(alt (*.f64 (cos.f64 theta) phi1) (patch (*.f64 (cos.f64 theta) phi1) #<representation binary64>) () ())) ())
#s(alt (* phi1 (cos theta)) (taylor 0 phi1) (#s(alt (*.f64 (cos.f64 theta) phi1) (patch (*.f64 (cos.f64 theta) phi1) #<representation binary64>) () ())) ())
#s(alt (* phi1 (cos theta)) (taylor inf phi1) (#s(alt (*.f64 (cos.f64 theta) phi1) (patch (*.f64 (cos.f64 theta) phi1) #<representation binary64>) () ())) ())
#s(alt (* phi1 (cos theta)) (taylor inf phi1) (#s(alt (*.f64 (cos.f64 theta) phi1) (patch (*.f64 (cos.f64 theta) phi1) #<representation binary64>) () ())) ())
#s(alt (* phi1 (cos theta)) (taylor inf phi1) (#s(alt (*.f64 (cos.f64 theta) phi1) (patch (*.f64 (cos.f64 theta) phi1) #<representation binary64>) () ())) ())
#s(alt (* phi1 (cos theta)) (taylor inf phi1) (#s(alt (*.f64 (cos.f64 theta) phi1) (patch (*.f64 (cos.f64 theta) phi1) #<representation binary64>) () ())) ())
#s(alt (* phi1 (cos theta)) (taylor -inf phi1) (#s(alt (*.f64 (cos.f64 theta) phi1) (patch (*.f64 (cos.f64 theta) phi1) #<representation binary64>) () ())) ())
#s(alt (* phi1 (cos theta)) (taylor -inf phi1) (#s(alt (*.f64 (cos.f64 theta) phi1) (patch (*.f64 (cos.f64 theta) phi1) #<representation binary64>) () ())) ())
#s(alt (* phi1 (cos theta)) (taylor -inf phi1) (#s(alt (*.f64 (cos.f64 theta) phi1) (patch (*.f64 (cos.f64 theta) phi1) #<representation binary64>) () ())) ())
#s(alt (* phi1 (cos theta)) (taylor -inf phi1) (#s(alt (*.f64 (cos.f64 theta) phi1) (patch (*.f64 (cos.f64 theta) phi1) #<representation binary64>) () ())) ())
#s(alt (* phi1 (sin delta)) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* -1/6 (sin delta)))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (+ (* -1/6 (sin delta)) (* (pow phi1 2) (+ (* 1/120 (sin delta)) (+ (* 1/24 (sin delta)) (* 1/12 (sin delta)))))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (+ (* -1/6 (sin delta)) (* (pow phi1 2) (+ (* 1/120 (sin delta)) (+ (* 1/24 (sin delta)) (+ (* 1/12 (sin delta)) (* (pow phi1 2) (+ (* -1/144 (sin delta)) (+ (* -1/240 (sin delta)) (+ (* -1/720 (sin delta)) (* -1/5040 (sin delta))))))))))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin phi1))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin phi1)))) (* (cos phi1) (sin phi1)))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin phi1)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin phi1))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin phi1)))))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin phi1)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin phi1))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin phi1)))) (* 1/120 (* (cos phi1) (sin phi1))))))))) (taylor 0 delta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin phi1))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin phi1))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin phi1))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin phi1))) (taylor inf delta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin phi1))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin phi1))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin phi1))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin phi1))) (taylor -inf delta) (#s(alt (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
Calls

216 calls:

TimeVariablePointExpression
17.0ms
theta
@inf
(* (cos theta) phi1)
3.0ms
lambda1
@inf
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
2.0ms
lambda1
@-inf
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
1.0ms
phi1
@inf
(* delta (* (+ (* -1/6 (* delta delta)) 1) (* (cos phi1) (sin theta))))
1.0ms
theta
@inf
(* delta (* (+ (* -1/6 (* delta delta)) 1) (* (cos phi1) (sin theta))))

rewrite423.0ms (2.3%)

Memory
53.8MiB live, 544.1MiB allocated
Algorithm
batch-egg-rewrite
Rules
4 872×lower-fma.f32
4 866×lower-fma.f64
4 766×lower-*.f32
4 732×lower-*.f64
3 744×lower-/.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
050368
095368
1343368
22463368
09182366
Stop Event
iter limit
node limit
iter limit
Counts
29 → 404
Calls
Call 1
Inputs
(-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta)))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
(*.f64 delta (sin.f64 theta))
(sin.f64 theta)
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)))
(atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta))
(*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))))
(*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1)
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1))))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1)))
(sin.f64 delta)
(-.f64 (cos.f64 delta) (*.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)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
(cos.f64 delta)
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1))
(*.f64 (sin.f64 theta) (cos.f64 phi1))
(*.f64 (cos.f64 theta) phi1)
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
Outputs
(+.f64 (cos.f64 delta) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (cos.f64 delta))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))))
(-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.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)))) (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)))) (/.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.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 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)))))
(-.f64 (-.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (*.f64 (cos.f64 (+.f64 phi1 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 delta)))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)))
(-.f64 (/.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) #s(literal 3 binary64)) (+.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (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 3 binary64)) (+.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (cos.f64 delta) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.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 (cos.f64 delta) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) #s(literal 2 binary64)) (+.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (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 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (cos.f64 delta))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.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 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 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) (/.f64 (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.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 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (+.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 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #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 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.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 (cos.f64 delta) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.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 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.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 (cos.f64 delta) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 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 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.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 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #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 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.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 (cos.f64 delta) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.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)))) (neg.f64 (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.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)))) (neg.f64 (-.f64 (cos.f64 delta) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) #s(literal 3 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 3 binary64))) (+.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.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 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 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) (neg.f64 (/.f64 (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.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 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (fma.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)) #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 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 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)) #s(literal 2 binary64))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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 (+.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64))))) (*.f64 (+.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64))))
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 delta))) (*.f64 (cos.f64 delta) #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 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)) #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 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))))) (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 delta))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)) #s(literal 3 binary64))) (-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 delta))) (*.f64 (cos.f64 delta) #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 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))))) (-.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 delta))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 delta) #s(literal 1/2 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 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))))) (-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 delta))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)) #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))))) (*.f64 (cos.f64 delta) (fma.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 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 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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 (-.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))))) (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64))))
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)) #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))))) (*.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 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 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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 (-.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 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 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64))))
(/.f64 (-.f64 (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 delta))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)))))) (*.f64 (+.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)) #s(literal 3 binary64))))) (*.f64 (+.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 delta))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 delta))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)))) (*.f64 (+.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (-.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 delta))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 (+.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 delta))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)) #s(literal 2 binary64))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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 (+.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (*.f64 (cos.f64 delta) (fma.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64))))) (*.f64 (+.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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 (-.f64 (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64))))
(/.f64 (-.f64 (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)) #s(literal 2 binary64))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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 (+.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (*.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64)) (cos.f64 delta)))) (*.f64 (+.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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 (-.f64 (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64)) (cos.f64 delta)))) (*.f64 (+.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64))))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (+.f64 #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 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)))) (*.f64 (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.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 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta 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 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.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))))) (neg.f64 (neg.f64 (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) #s(literal 3 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 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (neg.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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)))) (neg.f64 (+.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (neg.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (cos.f64 delta)))))
(/.f64 (+.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))))))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.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 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 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))
(pow.f64 (/.f64 (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.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)))) #s(literal -1 binary64))
(*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 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 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.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 (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.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) (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1)
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.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 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1))) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 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) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.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 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1))))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.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 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 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 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1)))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.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 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.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)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1))) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 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) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.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 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.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 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (neg.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.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))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.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 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1)))
(pow.f64 (/.f64 (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1))) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 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))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.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)))) #s(literal -1 binary64))
(*.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 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 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1)))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.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 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 delta) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))) (sin.f64 delta)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (sin.f64 delta) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))) (sin.f64 delta))) #s(literal -2 binary64))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) lambda1)
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))) (/.f64 (pow.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) lambda1))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (pow.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (-.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) lambda1)))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))))
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
(*.f64 delta (sin.f64 theta))
(*.f64 (sin.f64 theta) delta)
(sin.f64 theta)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) lambda1)
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) lambda1))) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) lambda1))))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) lambda1)))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) lambda1))) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) lambda1))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) lambda1))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) lambda1)))
(pow.f64 (/.f64 (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) lambda1))) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) lambda1)))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta)))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (cos.f64 delta))
(/.f64 (*.f64 (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))))) #s(literal -2 binary64))
(*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))))
(*.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) delta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))))
(*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) delta)
(*.f64 (*.f64 (cos.f64 phi1) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))) (*.f64 delta (sin.f64 theta)))
(*.f64 (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(*.f64 (*.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(*.f64 (*.f64 delta (*.f64 (cos.f64 phi1) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (sin.f64 theta))
(*.f64 (*.f64 (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))) (cos.f64 phi1)) (sin.f64 theta))
(*.f64 (*.f64 (*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))) (sin.f64 theta)) (cos.f64 phi1))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64)))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (*.f64 (*.f64 delta (*.f64 delta #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 theta))))
(+.f64 (*.f64 (*.f64 delta (*.f64 delta #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (sin.f64 theta))))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 (*.f64 delta (*.f64 delta #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 theta))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64)))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) #s(literal 1 binary64)))
(fma.f64 (*.f64 delta (*.f64 delta #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (sin.f64 theta))))
(/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/216 binary64) (*.f64 delta (*.f64 delta delta))) (*.f64 delta (*.f64 delta delta)) #s(literal 1 binary64)) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta)))) (*.f64 (-.f64 (fma.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)) #s(literal 1 binary64)) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64)))) #s(literal 2 binary64)))
(/.f64 (*.f64 (fma.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)) #s(literal -1 binary64)) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta)))) (*.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal -1 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))) (fma.f64 (*.f64 #s(literal -1/216 binary64) (*.f64 delta (*.f64 delta delta))) (*.f64 delta (*.f64 delta delta)) #s(literal 1 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (fma.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)) #s(literal 1 binary64)) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64))))))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))) (fma.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)) #s(literal -1 binary64))) (*.f64 #s(literal 2 binary64) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal -1 binary64))))
(/.f64 (*.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 (*.f64 #s(literal -1/216 binary64) (*.f64 delta (*.f64 delta delta))) (*.f64 delta (*.f64 delta delta)) #s(literal 1 binary64))) (-.f64 (fma.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)) #s(literal 1 binary64)) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64)))))
(/.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)) #s(literal -1 binary64))) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal -1 binary64)))
(/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/216 binary64) (*.f64 delta (*.f64 delta delta))) (*.f64 delta (*.f64 delta delta)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (fma.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)) #s(literal 1 binary64)) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64)))))
(/.f64 (*.f64 (fma.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)) #s(literal -1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal -1 binary64)))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/216 binary64) (*.f64 delta (*.f64 delta delta))) (*.f64 delta (*.f64 delta delta)) #s(literal 1 binary64)) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))))) (neg.f64 (*.f64 (-.f64 (fma.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)) #s(literal 1 binary64)) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64)))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)) #s(literal -1 binary64)) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))))) (neg.f64 (*.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal -1 binary64)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))) (fma.f64 (*.f64 #s(literal -1/216 binary64) (*.f64 delta (*.f64 delta delta))) (*.f64 delta (*.f64 delta delta)) #s(literal 1 binary64)))) (neg.f64 (*.f64 #s(literal 2 binary64) (-.f64 (fma.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)) #s(literal 1 binary64)) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64)))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))) (fma.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)) #s(literal -1 binary64)))) (neg.f64 (*.f64 #s(literal 2 binary64) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal -1 binary64)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 (*.f64 #s(literal -1/216 binary64) (*.f64 delta (*.f64 delta delta))) (*.f64 delta (*.f64 delta delta)) #s(literal 1 binary64)))) (neg.f64 (-.f64 (fma.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)) #s(literal 1 binary64)) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)) #s(literal -1 binary64)))) (neg.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal -1 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/216 binary64) (*.f64 delta (*.f64 delta delta))) (*.f64 delta (*.f64 delta delta)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (neg.f64 (-.f64 (fma.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)) #s(literal 1 binary64)) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)) #s(literal -1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (neg.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal -1 binary64))))
(/.f64 (neg.f64 (*.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))) #s(literal -2 binary64))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64))))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) #s(literal 1 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 delta (*.f64 delta #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (*.f64 (*.f64 (*.f64 delta (*.f64 delta #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (*.f64 (*.f64 delta (*.f64 delta #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (*.f64 (*.f64 delta (*.f64 delta #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 theta)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 delta (*.f64 delta #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (sin.f64 theta))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 delta (*.f64 delta #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (*.f64 (*.f64 delta (*.f64 delta #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (*.f64 (*.f64 (*.f64 delta (*.f64 delta #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (sin.f64 theta)))))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))))
(*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))))
(*.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(*.f64 (*.f64 (cos.f64 phi1) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))) (sin.f64 theta))
(*.f64 (*.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)) (sin.f64 theta)) (cos.f64 phi1))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) lambda1)
(-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta)))))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) #s(literal 2 binary64))) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) #s(literal 3 binary64))) (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta)))))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) #s(literal 2 binary64))))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) #s(literal 2 binary64)) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta)))))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) lambda1))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta)))))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda1 lambda1 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) #s(literal 2 binary64)) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) lambda1)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta)))))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) #s(literal 2 binary64))) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta)))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) lambda1)) (*.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) lambda1) (*.f64 lambda1 lambda1))) (*.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) lambda1) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) lambda1)))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta)))))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) (neg.f64 (neg.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) lambda1))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))))))
(pow.f64 (/.f64 (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta)))))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) #s(literal 2 binary64))) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) #s(literal -1 binary64))
(*.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta)))))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))) lambda1)))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta)))))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 delta) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))) (sin.f64 delta)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (sin.f64 delta) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))) (sin.f64 delta))) #s(literal -2 binary64))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(sin.f64 delta)
(+.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))))
(+.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (cos.f64 delta))
(-.f64 (cos.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 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (*.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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta 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 3 binary64)) (fma.f64 (*.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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (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)))) (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.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)) (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 (+.f64 phi1 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 delta)))) (*.f64 (cos.f64 delta) #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 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.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)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))))))
(fma.f64 (cos.f64 delta) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (cos.f64 delta))
(fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta) (cos.f64 delta))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (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 (cos.f64 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) (/.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 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 (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 (cos.f64 delta) #s(literal 3 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 3 binary64))) (fma.f64 (*.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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (+.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 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #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 (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 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 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)))) (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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #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)))) (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 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 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 3 binary64)))) (neg.f64 (fma.f64 (*.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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (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 (cos.f64 delta) #s(literal 3 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 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 (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 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (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 (cos.f64 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 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (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 (cos.f64 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 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (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 (cos.f64 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) (neg.f64 (/.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 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 (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 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (*.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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (fma.f64 (*.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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (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 3 binary64)))) (pow.f64 (fma.f64 (*.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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 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 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta 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 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (cos.f64 delta)))))
(pow.f64 (/.f64 (fma.f64 (*.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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (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 (cos.f64 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))
(pow.f64 (/.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 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 (cos.f64 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))
(*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 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 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (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 (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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))))
(*.f64 (/.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (cos.f64 delta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1)
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.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 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.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 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.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 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1))) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 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) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.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 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1))))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.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 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.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 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 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 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1)))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.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 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.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)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (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 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1))) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 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) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.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 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.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 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.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 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.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))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.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 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1)))
(pow.f64 (/.f64 (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1))) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 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))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.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)))) #s(literal -1 binary64))
(*.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 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 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1)))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.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 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (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 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (-.f64 #s(literal 1/2 binary64) (*.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))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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))) (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) (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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 (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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)) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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 (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 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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 (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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))) (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) (neg.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (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 (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 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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 (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/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(pow.f64 (/.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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))) (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))
(pow.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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))
(*.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) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 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/4 binary64) (+.f64 #s(literal 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 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 delta theta)) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 delta theta)) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))))
(/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #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 delta theta))))))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 delta theta)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal -1 binary64))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))
(/.f64 (*.f64 (sin.f64 phi1) (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 theta phi1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 theta phi1))) (sin.f64 phi1)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (sin.f64 phi1) (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 theta phi1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 theta phi1))) (sin.f64 phi1))) #s(literal -2 binary64))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
(*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1))
(*.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (cos.f64 theta))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))
(cos.f64 delta)
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta)))))
(/.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta)))) #s(literal -2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))))) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta)))) #s(literal -1 binary64))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(*.f64 (sin.f64 theta) (cos.f64 phi1))
(*.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64))))
(+.f64 (*.f64 delta (*.f64 delta #s(literal -1/6 binary64))) #s(literal 1 binary64))
(-.f64 (/.f64 (*.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta))) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal -1 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64))))) (/.f64 (*.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta))) (-.f64 #s(literal 1 binary64) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64))))))
(fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))
(fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 delta delta) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64))) #s(literal 1 binary64))
(fma.f64 (*.f64 delta (*.f64 delta #s(literal -1/6 binary64))) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 delta #s(literal -1/6 binary64)) delta #s(literal 1 binary64))
(fma.f64 (*.f64 delta #s(literal -1/6 binary64)) (*.f64 delta #s(literal 1 binary64)) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)) #s(literal 1 binary64)) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64)))) (fma.f64 (*.f64 #s(literal -1/216 binary64) (*.f64 delta (*.f64 delta delta))) (*.f64 delta (*.f64 delta delta)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)) #s(literal -1 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal -1/216 binary64) (*.f64 delta (*.f64 delta delta))) (*.f64 delta (*.f64 delta delta)) #s(literal 1 binary64)) (-.f64 (fma.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)) #s(literal 1 binary64)) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal -1/216 binary64) (*.f64 delta (*.f64 delta delta))) (*.f64 delta (*.f64 delta delta)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta))) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64))))))
(/.f64 (fma.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)) #s(literal -1 binary64)) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal -1 binary64)))
(/.f64 (neg.f64 (fma.f64 (*.f64 #s(literal -1/216 binary64) (*.f64 delta (*.f64 delta delta))) (*.f64 delta (*.f64 delta delta)) #s(literal 1 binary64))) (neg.f64 (-.f64 (fma.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)) #s(literal 1 binary64)) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 #s(literal -1/216 binary64) (*.f64 delta (*.f64 delta delta))) (*.f64 delta (*.f64 delta delta)) #s(literal 1 binary64))) (neg.f64 (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta))) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64)))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)) #s(literal -1 binary64))) (neg.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal -1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (fma.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)) #s(literal 1 binary64)) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64)))) (fma.f64 (*.f64 #s(literal -1/216 binary64) (*.f64 delta (*.f64 delta delta))) (*.f64 delta (*.f64 delta delta)) #s(literal 1 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)) #s(literal -1 binary64)))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)))) (-.f64 #s(literal 1 binary64) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta))) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal -1 binary64))) (*.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal -1 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal -1 binary64)) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal -1 binary64))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 #s(literal -1/216 binary64) (*.f64 delta (*.f64 delta delta))) (*.f64 delta (*.f64 delta delta)) #s(literal 1 binary64)))) (neg.f64 (neg.f64 (-.f64 (fma.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)) #s(literal 1 binary64)) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)) #s(literal -1 binary64)))) (neg.f64 (neg.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal -1 binary64)))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta))))) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64))))))
(pow.f64 (/.f64 (-.f64 (fma.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)) #s(literal 1 binary64)) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64)))) (fma.f64 (*.f64 #s(literal -1/216 binary64) (*.f64 delta (*.f64 delta delta))) (*.f64 delta (*.f64 delta delta)) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)) #s(literal -1 binary64))) #s(literal -1 binary64))
(*.f64 (fma.f64 (*.f64 #s(literal -1/216 binary64) (*.f64 delta (*.f64 delta delta))) (*.f64 delta (*.f64 delta delta)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)) #s(literal 1 binary64)) (*.f64 delta (*.f64 delta #s(literal -1/6 binary64))))))
(*.f64 (fma.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 delta delta) (*.f64 delta delta)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal -1 binary64))))
(*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(*.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta)))
(*.f64 (sin.f64 delta) (*.f64 phi1 (cos.f64 theta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) phi1)
(*.f64 (*.f64 (sin.f64 delta) phi1) (cos.f64 theta))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta)))))
(/.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta)))) #s(literal -2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))))) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta)))) #s(literal -1 binary64))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(*.f64 (sin.f64 theta) (cos.f64 phi1))
(*.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 phi1 theta))) #s(literal 1/2 binary64))
(*.f64 phi1 (cos.f64 theta))
(*.f64 (cos.f64 theta) phi1)
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(*.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))
(*.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (sin.f64 delta))
(*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))

simplify587.0ms (3.2%)

Memory
-14.2MiB live, 862.9MiB allocated
Algorithm
egg-herbie
Rules
9 234×lower-fma.f64
9 234×lower-fma.f32
6 344×lower-+.f64
6 344×lower-+.f32
5 762×lower-*.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
065915780
1227915311
2512915050
3717215050
0832614449
Stop Event
iter limit
node limit
Counts
864 → 851
Calls
Call 1
Inputs
(- 1/2 (* -1/2 (cos (* 2 phi1))))
(- (+ 1/2 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (* -1/2 (cos (* 2 phi1))))
(- (+ 1/2 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (* -1/2 (cos (* 2 phi1))))
(- (+ 1/2 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (* -1/2 (cos (* 2 phi1))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(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) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (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 (* delta (sin theta)) (cos delta))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* delta (sin theta)) (cos delta)) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* delta (sin theta)) (cos delta)) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* delta (sin theta)) (cos delta)) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* delta (sin theta)) (cos delta)) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* delta (sin theta)) (cos delta)) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* delta (sin theta)) (cos delta)) lambda1)) 1)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(atan2 (* delta (sin theta)) (cos delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2 (* delta (sin theta)) (cos delta))
(* delta (sin theta))
(* delta (sin theta))
(* delta (sin theta))
(* delta (sin theta))
(* delta (sin theta))
(* delta (sin theta))
(* delta (sin theta))
(* delta (sin theta))
(* delta (sin theta))
(* delta (sin theta))
(* delta (sin theta))
(* delta (sin theta))
(* delta theta)
(* theta (+ delta (* -1/6 (* delta (pow theta 2)))))
(* theta (+ delta (* (pow theta 2) (+ (* -1/6 delta) (* 1/120 (* delta (pow theta 2)))))))
(* theta (+ delta (* (pow theta 2) (+ (* -1/6 delta) (* (pow theta 2) (+ (* -1/5040 (* delta (pow theta 2))) (* 1/120 delta)))))))
(* delta (sin theta))
(* delta (sin theta))
(* delta (sin theta))
(* delta (sin theta))
(* delta (sin theta))
(* delta (sin theta))
(* delta (sin theta))
(* delta (sin theta))
theta
(* theta (+ 1 (* -1/6 (pow theta 2))))
(* theta (+ 1 (* (pow theta 2) (- (* 1/120 (pow theta 2)) 1/6))))
(* theta (+ 1 (* (pow theta 2) (- (* (pow theta 2) (+ 1/120 (* -1/5040 (pow theta 2)))) 1/6))))
(sin theta)
(sin theta)
(sin theta)
(sin theta)
(sin theta)
(sin theta)
(sin theta)
(sin theta)
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) lambda1)) 1)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(* delta (* (cos phi1) (sin theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(* -1/6 (* (pow delta 3) (* (cos phi1) (sin theta))))
(* (pow delta 3) (+ (* -1/6 (* (cos phi1) (sin theta))) (/ (* (cos phi1) (sin theta)) (pow delta 2))))
(* (pow delta 3) (+ (* -1/6 (* (cos phi1) (sin theta))) (/ (* (cos phi1) (sin theta)) (pow delta 2))))
(* (pow delta 3) (+ (* -1/6 (* (cos phi1) (sin theta))) (/ (* (cos phi1) (sin theta)) (pow delta 2))))
(* -1/6 (* (pow delta 3) (* (cos phi1) (sin theta))))
(* -1 (* (pow delta 3) (+ (* -1 (/ (* (cos phi1) (sin theta)) (pow delta 2))) (* 1/6 (* (cos phi1) (sin theta))))))
(* -1 (* (pow delta 3) (+ (* -1 (/ (* (cos phi1) (sin theta)) (pow delta 2))) (* 1/6 (* (cos phi1) (sin theta))))))
(* -1 (* (pow delta 3) (+ (* -1 (/ (* (cos phi1) (sin theta)) (pow delta 2))) (* 1/6 (* (cos phi1) (sin theta))))))
(* delta (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(+ (* -1/2 (* delta (* (pow phi1 2) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))) (* delta (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(+ (* delta (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))) (* (pow phi1 2) (+ (* -1/2 (* delta (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (* 1/24 (* delta (* (pow phi1 2) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))))))
(+ (* delta (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))) (* (pow phi1 2) (+ (* -1/2 (* delta (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (* (pow phi1 2) (+ (* -1/720 (* delta (* (pow phi1 2) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))) (* 1/24 (* delta (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))))))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(* delta (* theta (* (cos phi1) (+ 1 (* -1/6 (pow delta 2))))))
(* theta (+ (* -1/6 (* delta (* (pow theta 2) (* (cos phi1) (+ 1 (* -1/6 (pow delta 2))))))) (* delta (* (cos phi1) (+ 1 (* -1/6 (pow delta 2)))))))
(* theta (+ (* delta (* (cos phi1) (+ 1 (* -1/6 (pow delta 2))))) (* (pow theta 2) (+ (* -1/6 (* delta (* (cos phi1) (+ 1 (* -1/6 (pow delta 2)))))) (* 1/120 (* delta (* (pow theta 2) (* (cos phi1) (+ 1 (* -1/6 (pow delta 2)))))))))))
(* theta (+ (* delta (* (cos phi1) (+ 1 (* -1/6 (pow delta 2))))) (* (pow theta 2) (+ (* -1/6 (* delta (* (cos phi1) (+ 1 (* -1/6 (pow delta 2)))))) (* (pow theta 2) (+ (* -1/5040 (* delta (* (pow theta 2) (* (cos phi1) (+ 1 (* -1/6 (pow delta 2))))))) (* 1/120 (* delta (* (cos phi1) (+ 1 (* -1/6 (pow delta 2))))))))))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(* (cos phi1) (sin theta))
(+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))
(+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))
(+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))
(* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta))))
(* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (/ (* (cos phi1) (sin theta)) (pow delta 2))))
(* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (/ (* (cos phi1) (sin theta)) (pow delta 2))))
(* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (/ (* (cos phi1) (sin theta)) (pow delta 2))))
(* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta))))
(* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (/ (* (cos phi1) (sin theta)) (pow delta 2))))
(* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (/ (* (cos phi1) (sin theta)) (pow delta 2))))
(* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (/ (* (cos phi1) (sin theta)) (pow delta 2))))
(* (sin theta) (+ 1 (* -1/6 (pow delta 2))))
(+ (* -1/2 (* (pow phi1 2) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(+ (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))) (* (pow phi1 2) (+ (* -1/2 (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))) (* 1/24 (* (pow phi1 2) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))))))
(+ (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))) (* (pow phi1 2) (+ (* -1/2 (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (* 1/24 (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(* theta (* (cos phi1) (+ 1 (* -1/6 (pow delta 2)))))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (+ 1 (* -1/6 (pow delta 2)))))) (* (cos phi1) (+ 1 (* -1/6 (pow delta 2))))))
(* theta (+ (* (cos phi1) (+ 1 (* -1/6 (pow delta 2)))) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (+ 1 (* -1/6 (pow delta 2))))) (* 1/120 (* (pow theta 2) (* (cos phi1) (+ 1 (* -1/6 (pow delta 2))))))))))
(* theta (+ (* (cos phi1) (+ 1 (* -1/6 (pow delta 2)))) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (+ 1 (* -1/6 (pow delta 2))))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (+ 1 (* -1/6 (pow delta 2)))))) (* 1/120 (* (cos phi1) (+ 1 (* -1/6 (pow delta 2)))))))))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) lambda1)) 1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(* 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)))
(* 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)))
(* (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)))
delta
(* delta (+ 1 (* -1/6 (pow delta 2))))
(* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6))))
(* delta (+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/120 (* -1/5040 (pow delta 2)))) 1/6))))
(sin delta)
(sin delta)
(sin delta)
(sin delta)
(sin delta)
(sin delta)
(sin delta)
(sin delta)
(- 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 (* (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 (cos (* 2 phi1))))
(- (+ 1/2 (* (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))))))))) (* -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))))))
(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 (neg (* -2 phi1)))))))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (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)))))
(* 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))
(* phi1 (cos theta))
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (+ (* -1/6 (cos theta)) (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta))))))))))
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (+ (* -1/6 (cos theta)) (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (+ (* 1/12 (cos theta)) (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta)))))))))))))))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (cos phi1) (sin phi1))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* (cos phi1) (sin phi1)))
(+ (* (cos phi1) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin phi1))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin phi1)))))))
(+ (* (cos phi1) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/24 (* (cos phi1) (sin phi1))))))))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
1
(+ 1 (* -1/2 (pow delta 2)))
(+ 1 (* (pow delta 2) (- (* 1/24 (pow delta 2)) 1/2)))
(+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/24 (* -1/720 (pow delta 2)))) 1/2)))
(cos delta)
(cos delta)
(cos delta)
(cos delta)
(cos delta)
(cos delta)
(cos delta)
(cos delta)
(sin theta)
(+ (sin theta) (* -1/2 (* (pow phi1 2) (sin theta))))
(+ (sin theta) (* (pow phi1 2) (+ (* -1/2 (sin theta)) (* 1/24 (* (pow phi1 2) (sin theta))))))
(+ (sin theta) (* (pow phi1 2) (+ (* -1/2 (sin theta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin theta))) (* 1/24 (sin theta)))))))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* theta (cos phi1))
(* theta (+ (cos phi1) (* -1/6 (* (pow theta 2) (cos phi1)))))
(* theta (+ (cos phi1) (* (pow theta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow theta 2) (cos phi1)))))))
(* theta (+ (cos phi1) (* (pow theta 2) (+ (* -1/6 (cos phi1)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
1
(+ 1 (* -1/6 (pow delta 2)))
(+ 1 (* -1/6 (pow delta 2)))
(+ 1 (* -1/6 (pow delta 2)))
(* -1/6 (pow delta 2))
(* (pow delta 2) (- (/ 1 (pow delta 2)) 1/6))
(* (pow delta 2) (- (/ 1 (pow delta 2)) 1/6))
(* (pow delta 2) (- (/ 1 (pow delta 2)) 1/6))
(* -1/6 (pow delta 2))
(* (pow delta 2) (- (/ 1 (pow delta 2)) 1/6))
(* (pow delta 2) (- (/ 1 (pow delta 2)) 1/6))
(* (pow delta 2) (- (/ 1 (pow delta 2)) 1/6))
(* delta (* phi1 (cos theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* phi1 (cos theta)))) (* phi1 (cos theta))))
(* delta (+ (* phi1 (cos theta)) (* (pow delta 2) (+ (* -1/6 (* phi1 (cos theta))) (* 1/120 (* (pow delta 2) (* phi1 (cos theta))))))))
(* delta (+ (* phi1 (cos theta)) (* (pow delta 2) (+ (* -1/6 (* phi1 (cos theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* phi1 (cos theta)))) (* 1/120 (* phi1 (cos theta)))))))))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (sin delta))
(+ (* -1/2 (* phi1 (* (pow theta 2) (sin delta)))) (* phi1 (sin delta)))
(+ (* phi1 (sin delta)) (* (pow theta 2) (+ (* -1/2 (* phi1 (sin delta))) (* 1/24 (* phi1 (* (pow theta 2) (sin delta)))))))
(+ (* phi1 (sin delta)) (* (pow theta 2) (+ (* -1/2 (* phi1 (sin delta))) (* (pow theta 2) (+ (* -1/720 (* phi1 (* (pow theta 2) (sin delta)))) (* 1/24 (* phi1 (sin delta))))))))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (* (cos theta) (sin delta)))
(* theta (cos phi1))
(* theta (+ (cos phi1) (* -1/6 (* (pow theta 2) (cos phi1)))))
(* theta (+ (cos phi1) (* (pow theta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow theta 2) (cos phi1)))))))
(* theta (+ (cos phi1) (* (pow theta 2) (+ (* -1/6 (cos phi1)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(sin theta)
(+ (sin theta) (* -1/2 (* (pow phi1 2) (sin theta))))
(+ (sin theta) (* (pow phi1 2) (+ (* -1/2 (sin theta)) (* 1/24 (* (pow phi1 2) (sin theta))))))
(+ (sin theta) (* (pow phi1 2) (+ (* -1/2 (sin theta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin theta))) (* 1/24 (sin theta)))))))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
phi1
(+ phi1 (* -1/2 (* phi1 (pow theta 2))))
(+ phi1 (* (pow theta 2) (+ (* -1/2 phi1) (* 1/24 (* phi1 (pow theta 2))))))
(+ phi1 (* (pow theta 2) (+ (* -1/2 phi1) (* (pow theta 2) (+ (* -1/720 (* phi1 (pow theta 2))) (* 1/24 phi1))))))
(* phi1 (cos theta))
(* phi1 (cos theta))
(* phi1 (cos theta))
(* phi1 (cos theta))
(* phi1 (cos theta))
(* phi1 (cos theta))
(* phi1 (cos theta))
(* phi1 (cos theta))
(* phi1 (cos theta))
(* phi1 (cos theta))
(* phi1 (cos theta))
(* phi1 (cos theta))
(* phi1 (cos theta))
(* phi1 (cos theta))
(* phi1 (cos theta))
(* phi1 (cos theta))
(* phi1 (cos theta))
(* phi1 (cos theta))
(* phi1 (cos theta))
(* phi1 (cos theta))
(* phi1 (sin delta))
(* phi1 (+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* -1/6 (sin delta))))))
(* phi1 (+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (+ (* -1/6 (sin delta)) (* (pow phi1 2) (+ (* 1/120 (sin delta)) (+ (* 1/24 (sin delta)) (* 1/12 (sin delta))))))))))
(* phi1 (+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (+ (* -1/6 (sin delta)) (* (pow phi1 2) (+ (* 1/120 (sin delta)) (+ (* 1/24 (sin delta)) (+ (* 1/12 (sin delta)) (* (pow phi1 2) (+ (* -1/144 (sin delta)) (+ (* -1/240 (sin delta)) (+ (* -1/720 (sin delta)) (* -1/5040 (sin delta)))))))))))))))
(* (cos phi1) (* (sin delta) (sin phi1)))
(* (cos phi1) (* (sin delta) (sin phi1)))
(* (cos phi1) (* (sin delta) (sin phi1)))
(* (cos phi1) (* (sin delta) (sin phi1)))
(* (cos phi1) (* (sin delta) (sin phi1)))
(* (cos phi1) (* (sin delta) (sin phi1)))
(* (cos phi1) (* (sin delta) (sin phi1)))
(* (cos phi1) (* (sin delta) (sin phi1)))
(* delta (* (cos phi1) (sin phi1)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin phi1)))) (* (cos phi1) (sin phi1))))
(* delta (+ (* (cos phi1) (sin phi1)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin phi1))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin phi1))))))))
(* delta (+ (* (cos phi1) (sin phi1)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin phi1))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin phi1)))) (* 1/120 (* (cos phi1) (sin phi1)))))))))
(* (cos phi1) (* (sin delta) (sin phi1)))
(* (cos phi1) (* (sin delta) (sin phi1)))
(* (cos phi1) (* (sin delta) (sin phi1)))
(* (cos phi1) (* (sin delta) (sin phi1)))
(* (cos phi1) (* (sin delta) (sin phi1)))
(* (cos phi1) (* (sin delta) (sin phi1)))
(* (cos phi1) (* (sin delta) (sin phi1)))
(* (cos phi1) (* (sin delta) (sin phi1)))
Outputs
(- 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(- (+ 1/2 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (neg.f64 (*.f64 delta (cos.f64 phi1))) (*.f64 (cos.f64 theta) (sin.f64 phi1)) #s(literal 1/2 binary64)))
(- (+ 1/2 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (* -1/2 (cos (* 2 phi1))))
(fma.f64 delta (fma.f64 delta (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(- (+ 1/2 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (* -1/2 (cos (* 2 phi1))))
(fma.f64 delta (fma.f64 delta (fma.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 phi1))) #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (neg.f64 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta)))) (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 phi1 (fma.f64 phi1 (fma.f64 phi1 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 2/3 binary64)) (neg.f64 (cos.f64 delta))) (neg.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))) (cos.f64 delta))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)) (*.f64 theta theta)) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(fma.f64 (*.f64 theta theta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (*.f64 theta theta) #s(literal 1/2 binary64))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(fma.f64 (*.f64 theta theta) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64))))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) (/.f64 lambda1 lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) (/.f64 lambda1 lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) (/.f64 lambda1 lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)) (neg.f64 lambda1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(* 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 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (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 theta (fma.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 (*.f64 theta theta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(*.f64 theta (fma.f64 (*.f64 theta theta) (fma.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 (*.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (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 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(*.f64 delta (fma.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(*.f64 delta (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))))) (*.f64 (cos.f64 phi1) (sin.f64 theta))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(fma.f64 (sin.f64 delta) (sin.f64 theta) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 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 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 delta)) (sin.f64 theta))) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(atan2 (* delta (sin theta)) (cos delta))
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* delta (sin theta)) (cos delta)) lambda1)))
(fma.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (/.f64 lambda1 lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* delta (sin theta)) (cos delta)) lambda1)))
(fma.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (/.f64 lambda1 lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* delta (sin theta)) (cos delta)) lambda1)))
(fma.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) (/.f64 lambda1 lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* delta (sin theta)) (cos delta)) lambda1)) 1)))
(*.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* delta (sin theta)) (cos delta)) lambda1)) 1)))
(*.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* delta (sin theta)) (cos delta)) lambda1)) 1)))
(*.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) lambda1))))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (sin theta)) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(atan2 (* delta (sin theta)) (cos delta))
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
(atan2 (* delta (sin theta)) (cos delta))
(atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta theta)
(*.f64 delta theta)
(* theta (+ delta (* -1/6 (* delta (pow theta 2)))))
(*.f64 theta (fma.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 theta theta)) delta))
(* theta (+ delta (* (pow theta 2) (+ (* -1/6 delta) (* 1/120 (* delta (pow theta 2)))))))
(*.f64 theta (fma.f64 (*.f64 theta theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta (*.f64 theta theta)) (*.f64 delta #s(literal -1/6 binary64))) delta))
(* theta (+ delta (* (pow theta 2) (+ (* -1/6 delta) (* (pow theta 2) (+ (* -1/5040 (* delta (pow theta 2))) (* 1/120 delta)))))))
(*.f64 theta (fma.f64 (*.f64 theta theta) (fma.f64 (*.f64 theta theta) (fma.f64 delta #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 delta (*.f64 theta theta)))) (*.f64 delta #s(literal -1/6 binary64))) delta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
theta
(* theta (+ 1 (* -1/6 (pow theta 2))))
(fma.f64 theta (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta)) theta)
(* theta (+ 1 (* (pow theta 2) (- (* 1/120 (pow theta 2)) 1/6))))
(*.f64 theta (fma.f64 (*.f64 theta theta) (fma.f64 (*.f64 theta theta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(* theta (+ 1 (* (pow theta 2) (- (* (pow theta 2) (+ 1/120 (* -1/5040 (pow theta 2)))) 1/6))))
(fma.f64 theta (*.f64 (*.f64 theta theta) (fma.f64 (*.f64 theta theta) (fma.f64 (*.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) theta)
(sin theta)
(sin.f64 theta)
(sin theta)
(sin.f64 theta)
(sin theta)
(sin.f64 theta)
(sin theta)
(sin.f64 theta)
(sin theta)
(sin.f64 theta)
(sin theta)
(sin.f64 theta)
(sin theta)
(sin.f64 theta)
(sin theta)
(sin.f64 theta)
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) lambda1)))
(fma.f64 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)) (/.f64 lambda1 lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) lambda1)))
(fma.f64 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)) (/.f64 lambda1 lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) lambda1)))
(fma.f64 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)) (/.f64 lambda1 lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)) lambda1)) (neg.f64 lambda1))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta)))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (- 1 (* 1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(atan2 (* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (cos delta))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(* 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 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* -1/6 (* (pow delta 3) (* (cos phi1) (sin theta))))
(*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 delta delta))) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (pow delta 3) (+ (* -1/6 (* (cos phi1) (sin theta))) (/ (* (cos phi1) (sin theta)) (pow delta 2))))
(*.f64 (*.f64 delta (*.f64 delta delta)) (fma.f64 (cos.f64 phi1) (/.f64 (sin.f64 theta) (*.f64 delta delta)) (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64)) (sin.f64 theta))))
(* (pow delta 3) (+ (* -1/6 (* (cos phi1) (sin theta))) (/ (* (cos phi1) (sin theta)) (pow delta 2))))
(*.f64 (*.f64 delta (*.f64 delta delta)) (fma.f64 (cos.f64 phi1) (/.f64 (sin.f64 theta) (*.f64 delta delta)) (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64)) (sin.f64 theta))))
(* (pow delta 3) (+ (* -1/6 (* (cos phi1) (sin theta))) (/ (* (cos phi1) (sin theta)) (pow delta 2))))
(*.f64 (*.f64 delta (*.f64 delta delta)) (fma.f64 (cos.f64 phi1) (/.f64 (sin.f64 theta) (*.f64 delta delta)) (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64)) (sin.f64 theta))))
(* -1/6 (* (pow delta 3) (* (cos phi1) (sin theta))))
(*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 delta delta))) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* -1 (* (pow delta 3) (+ (* -1 (/ (* (cos phi1) (sin theta)) (pow delta 2))) (* 1/6 (* (cos phi1) (sin theta))))))
(*.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) (cos.f64 phi1)) (sin.f64 theta)) (/.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta delta))) (neg.f64 (*.f64 delta (*.f64 delta delta))))
(* -1 (* (pow delta 3) (+ (* -1 (/ (* (cos phi1) (sin theta)) (pow delta 2))) (* 1/6 (* (cos phi1) (sin theta))))))
(*.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) (cos.f64 phi1)) (sin.f64 theta)) (/.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta delta))) (neg.f64 (*.f64 delta (*.f64 delta delta))))
(* -1 (* (pow delta 3) (+ (* -1 (/ (* (cos phi1) (sin theta)) (pow delta 2))) (* 1/6 (* (cos phi1) (sin theta))))))
(*.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) (cos.f64 phi1)) (sin.f64 theta)) (/.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta delta))) (neg.f64 (*.f64 delta (*.f64 delta delta))))
(* delta (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(*.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))
(+ (* -1/2 (* delta (* (pow phi1 2) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))) (* delta (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(fma.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) delta) (*.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))))
(+ (* delta (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))) (* (pow phi1 2) (+ (* -1/2 (* delta (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (* 1/24 (* delta (* (pow phi1 2) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))))))
(fma.f64 (*.f64 phi1 phi1) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 delta (*.f64 phi1 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))))) (*.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+ (* delta (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))) (* (pow phi1 2) (+ (* -1/2 (* delta (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (* (pow phi1 2) (+ (* -1/720 (* delta (* (pow phi1 2) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))) (* 1/24 (* delta (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))))))))
(fma.f64 (*.f64 phi1 phi1) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))) (*.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 #s(literal -1/720 binary64) delta) (*.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (*.f64 (*.f64 #s(literal 1/24 binary64) delta) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))))) (*.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* delta (* theta (* (cos phi1) (+ 1 (* -1/6 (pow delta 2))))))
(*.f64 (*.f64 delta theta) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* theta (+ (* -1/6 (* delta (* (pow theta 2) (* (cos phi1) (+ 1 (* -1/6 (pow delta 2))))))) (* delta (* (cos phi1) (+ 1 (* -1/6 (pow delta 2)))))))
(*.f64 theta (fma.f64 (*.f64 delta #s(literal -1/6 binary64)) (*.f64 (*.f64 theta theta) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (*.f64 (*.f64 delta (cos.f64 phi1)) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))))
(* theta (+ (* delta (* (cos phi1) (+ 1 (* -1/6 (pow delta 2))))) (* (pow theta 2) (+ (* -1/6 (* delta (* (cos phi1) (+ 1 (* -1/6 (pow delta 2)))))) (* 1/120 (* delta (* (pow theta 2) (* (cos phi1) (+ 1 (* -1/6 (pow delta 2)))))))))))
(*.f64 theta (fma.f64 (*.f64 theta theta) (fma.f64 (*.f64 delta #s(literal 1/120 binary64)) (*.f64 (*.f64 theta theta) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (*.f64 (*.f64 delta #s(literal -1/6 binary64)) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))) (*.f64 (*.f64 delta (cos.f64 phi1)) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))))
(* theta (+ (* delta (* (cos phi1) (+ 1 (* -1/6 (pow delta 2))))) (* (pow theta 2) (+ (* -1/6 (* delta (* (cos phi1) (+ 1 (* -1/6 (pow delta 2)))))) (* (pow theta 2) (+ (* -1/5040 (* delta (* (pow theta 2) (* (cos phi1) (+ 1 (* -1/6 (pow delta 2))))))) (* 1/120 (* delta (* (cos phi1) (+ 1 (* -1/6 (pow delta 2))))))))))))
(*.f64 theta (fma.f64 (*.f64 theta theta) (fma.f64 (*.f64 theta theta) (fma.f64 (*.f64 delta #s(literal 1/120 binary64)) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal -1/5040 binary64) delta) (*.f64 (*.f64 theta theta) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))))) (*.f64 (*.f64 delta #s(literal -1/6 binary64)) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))) (*.f64 (*.f64 delta (cos.f64 phi1)) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* delta (* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))
(*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta))))
(*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (/ (* (cos phi1) (sin theta)) (pow delta 2))))
(fma.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64)) (sin.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (/ (* (cos phi1) (sin theta)) (pow delta 2))))
(fma.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64)) (sin.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (/ (* (cos phi1) (sin theta)) (pow delta 2))))
(fma.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64)) (sin.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta))))
(*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (/ (* (cos phi1) (sin theta)) (pow delta 2))))
(fma.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64)) (sin.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (/ (* (cos phi1) (sin theta)) (pow delta 2))))
(fma.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64)) (sin.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (/ (* (cos phi1) (sin theta)) (pow delta 2))))
(fma.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64)) (sin.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (sin theta) (+ 1 (* -1/6 (pow delta 2))))
(*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))
(+ (* -1/2 (* (pow phi1 2) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+ (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))) (* (pow phi1 2) (+ (* -1/2 (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))) (* 1/24 (* (pow phi1 2) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))))))
(fma.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64)))))
(+ (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))) (* (pow phi1 2) (+ (* -1/2 (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))) (* 1/24 (* (sin theta) (+ 1 (* -1/6 (pow delta 2))))))))))
(fma.f64 (*.f64 phi1 phi1) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))))) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* theta (* (cos phi1) (+ 1 (* -1/6 (pow delta 2)))))
(*.f64 (*.f64 (cos.f64 phi1) theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (+ 1 (* -1/6 (pow delta 2)))))) (* (cos phi1) (+ 1 (* -1/6 (pow delta 2))))))
(*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))))
(* theta (+ (* (cos phi1) (+ 1 (* -1/6 (pow delta 2)))) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (+ 1 (* -1/6 (pow delta 2))))) (* 1/120 (* (pow theta 2) (* (cos phi1) (+ 1 (* -1/6 (pow delta 2))))))))))
(*.f64 theta (fma.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))) (fma.f64 (*.f64 theta theta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))))
(* theta (+ (* (cos phi1) (+ 1 (* -1/6 (pow delta 2)))) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (+ 1 (* -1/6 (pow delta 2))))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (+ 1 (* -1/6 (pow delta 2)))))) (* 1/120 (* (cos phi1) (+ 1 (* -1/6 (pow delta 2)))))))))))
(*.f64 theta (fma.f64 (*.f64 theta theta) (fma.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))) (fma.f64 (*.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* (cos phi1) (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) lambda1)))
(fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))) (/.f64 lambda1 lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) lambda1)))
(fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))) (/.f64 lambda1 lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) lambda1)))
(fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))) (/.f64 lambda1 lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta))))) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (* (cos theta) (sin delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 phi1) (cos.f64 delta)))
(* 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 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(*.f64 delta (fma.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(*.f64 delta (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))))) (*.f64 (cos.f64 phi1) (sin.f64 theta))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* 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 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (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 theta (fma.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 (*.f64 theta theta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(*.f64 theta (fma.f64 (*.f64 theta theta) (fma.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 (*.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(fma.f64 (sin.f64 delta) (sin.f64 theta) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 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 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 delta)) (sin.f64 theta))) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
delta
(* delta (+ 1 (* -1/6 (pow delta 2))))
(fma.f64 delta (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta)) delta)
(* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6))))
(fma.f64 delta (*.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) delta)
(* delta (+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/120 (* -1/5040 (pow delta 2)))) 1/6))))
(fma.f64 delta (*.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) delta)
(sin delta)
(sin.f64 delta)
(sin delta)
(sin.f64 delta)
(sin delta)
(sin.f64 delta)
(sin delta)
(sin.f64 delta)
(sin delta)
(sin.f64 delta)
(sin delta)
(sin.f64 delta)
(sin delta)
(sin.f64 delta)
(sin delta)
(sin.f64 delta)
(- 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -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 delta delta) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(- (+ 1/2 (* (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 (cos (* 2 phi1))))
(fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal -1/24 binary64) #s(literal 1/24 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(- (+ 1/2 (* (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))))))))) (* -1/2 (cos (* 2 phi1))))
(fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (-.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal -1/24 binary64) #s(literal 1/24 binary64)) (*.f64 (*.f64 delta delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal -1/720 binary64) #s(literal 1/720 binary64)))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))))
(*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))))
(*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))))
(*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))))
(*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))))
(*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))))
(*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))))
(*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))))
(*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* (pow phi1 2) (cos delta))))
(*.f64 (fma.f64 phi1 (neg.f64 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 phi1 phi1) (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/3 binary64) (*.f64 phi1 phi1) #s(literal -1 binary64))) (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 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) (*.f64 (cos.f64 delta) (fma.f64 #s(literal -2/45 binary64) (*.f64 phi1 phi1) #s(literal 1/3 binary64))) (neg.f64 (cos.f64 delta))) (cos.f64 delta))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))))
(*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))))
(*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))))
(*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))))
(*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))
(*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))
(*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))
(*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))
(*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) lambda1)))
(fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))) (/.f64 lambda1 lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) lambda1)))
(fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))) (/.f64 lambda1 lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) lambda1)))
(fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))) (/.f64 lambda1 lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))) lambda1)) (neg.f64 lambda1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(*.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/3 binary64) #s(literal 1 binary64)))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(*.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(*.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/315 binary64) #s(literal 2/45 binary64)) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(*.f64 theta (fma.f64 (*.f64 theta theta) (*.f64 (sin.f64 delta) (fma.f64 (*.f64 theta theta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (sin.f64 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))))))))
(*.f64 theta (fma.f64 (*.f64 theta theta) (fma.f64 (*.f64 theta theta) (*.f64 (sin.f64 delta) (fma.f64 (*.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/6 binary64))) (sin.f64 delta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(*.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(*.f64 delta (fma.f64 (*.f64 delta delta) (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (sin.f64 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))))))))
(*.f64 delta (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))) (*.f64 #s(literal -1/6 binary64) (sin.f64 theta))) (sin.f64 theta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* phi1 (cos theta))
(*.f64 phi1 (cos.f64 theta))
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))
(*.f64 phi1 (fma.f64 (*.f64 phi1 phi1) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)) (cos.f64 theta)))
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (+ (* -1/6 (cos theta)) (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta))))))))))
(*.f64 phi1 (fma.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) (*.f64 (cos.f64 theta) #s(literal 2/15 binary64)) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))) (cos.f64 theta)))
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (+ (* -1/6 (cos theta)) (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (+ (* 1/12 (cos theta)) (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta)))))))))))))))
(*.f64 phi1 (fma.f64 (*.f64 phi1 phi1) (fma.f64 (cos.f64 theta) #s(literal -2/3 binary64) (*.f64 (*.f64 phi1 phi1) (fma.f64 (cos.f64 theta) #s(literal 2/15 binary64) (*.f64 (*.f64 phi1 phi1) (*.f64 (cos.f64 theta) #s(literal -4/315 binary64)))))) (cos.f64 theta)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (sin phi1))
(*.f64 (cos.f64 phi1) (sin.f64 phi1))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* (cos phi1) (sin phi1)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))
(+ (* (cos phi1) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin phi1))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin phi1)))))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi1) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 theta theta) #s(literal -1/2 binary64)))))
(+ (* (cos phi1) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/24 (* (cos phi1) (sin phi1))))))))
(fma.f64 (*.f64 theta theta) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (*.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))))) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow delta 2)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))
(+ 1 (* (pow delta 2) (- (* 1/24 (pow delta 2)) 1/2)))
(fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/24 (* -1/720 (pow delta 2)))) 1/2)))
(fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(cos delta)
(cos.f64 delta)
(cos delta)
(cos.f64 delta)
(cos delta)
(cos.f64 delta)
(cos delta)
(cos.f64 delta)
(cos delta)
(cos.f64 delta)
(cos delta)
(cos.f64 delta)
(cos delta)
(cos.f64 delta)
(cos delta)
(cos.f64 delta)
(sin theta)
(sin.f64 theta)
(+ (sin theta) (* -1/2 (* (pow phi1 2) (sin theta))))
(*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))
(+ (sin theta) (* (pow phi1 2) (+ (* -1/2 (sin theta)) (* 1/24 (* (pow phi1 2) (sin theta))))))
(fma.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64))) (sin.f64 theta))
(+ (sin theta) (* (pow phi1 2) (+ (* -1/2 (sin theta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin theta))) (* 1/24 (sin theta)))))))
(fma.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))) (*.f64 #s(literal -1/2 binary64) (sin.f64 theta))) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* theta (cos phi1))
(*.f64 (cos.f64 phi1) theta)
(* theta (+ (cos phi1) (* -1/6 (* (pow theta 2) (cos phi1)))))
(*.f64 theta (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64))))
(* theta (+ (cos phi1) (* (pow theta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow theta 2) (cos phi1)))))))
(*.f64 theta (fma.f64 (*.f64 theta theta) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 theta theta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (cos.f64 phi1)))
(* theta (+ (cos phi1) (* (pow theta 2) (+ (* -1/6 (cos phi1)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(*.f64 theta (fma.f64 (*.f64 theta theta) (fma.f64 (*.f64 theta theta) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64))) (cos.f64 phi1)))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
1
#s(literal 1 binary64)
(+ 1 (* -1/6 (pow delta 2)))
(fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))
(+ 1 (* -1/6 (pow delta 2)))
(fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))
(+ 1 (* -1/6 (pow delta 2)))
(fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))
(* -1/6 (pow delta 2))
(*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))
(* (pow delta 2) (- (/ 1 (pow delta 2)) 1/6))
(fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))
(* (pow delta 2) (- (/ 1 (pow delta 2)) 1/6))
(fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))
(* (pow delta 2) (- (/ 1 (pow delta 2)) 1/6))
(fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))
(* -1/6 (pow delta 2))
(*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))
(* (pow delta 2) (- (/ 1 (pow delta 2)) 1/6))
(fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))
(* (pow delta 2) (- (/ 1 (pow delta 2)) 1/6))
(fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))
(* (pow delta 2) (- (/ 1 (pow delta 2)) 1/6))
(fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))
(* delta (* phi1 (cos theta)))
(*.f64 delta (*.f64 phi1 (cos.f64 theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* phi1 (cos theta)))) (* phi1 (cos theta))))
(*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 phi1 (cos.f64 theta))))
(* delta (+ (* phi1 (cos theta)) (* (pow delta 2) (+ (* -1/6 (* phi1 (cos theta))) (* 1/120 (* (pow delta 2) (* phi1 (cos theta))))))))
(*.f64 delta (fma.f64 (*.f64 delta delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (*.f64 phi1 (cos.f64 theta))))
(* delta (+ (* phi1 (cos theta)) (* (pow delta 2) (+ (* -1/6 (* phi1 (cos theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* phi1 (cos theta)))) (* 1/120 (* phi1 (cos theta)))))))))
(*.f64 delta (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 (cos.f64 theta)))) (*.f64 phi1 (cos.f64 theta))))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* phi1 (sin delta))
(*.f64 phi1 (sin.f64 delta))
(+ (* -1/2 (* phi1 (* (pow theta 2) (sin delta)))) (* phi1 (sin delta)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi1 (*.f64 theta theta)) (sin.f64 delta)) (*.f64 phi1 (sin.f64 delta)))
(+ (* phi1 (sin delta)) (* (pow theta 2) (+ (* -1/2 (* phi1 (sin delta))) (* 1/24 (* phi1 (* (pow theta 2) (sin delta)))))))
(fma.f64 (*.f64 theta theta) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 (*.f64 theta theta)) (sin.f64 delta)) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 delta)))) (*.f64 phi1 (sin.f64 delta)))
(+ (* phi1 (sin delta)) (* (pow theta 2) (+ (* -1/2 (* phi1 (sin delta))) (* (pow theta 2) (+ (* -1/720 (* phi1 (* (pow theta 2) (sin delta)))) (* 1/24 (* phi1 (sin delta))))))))
(fma.f64 (*.f64 theta theta) (fma.f64 (*.f64 theta theta) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 phi1 (*.f64 theta theta)) (sin.f64 delta)) (*.f64 #s(literal 1/24 binary64) (*.f64 phi1 (sin.f64 delta)))) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 delta)))) (*.f64 phi1 (sin.f64 delta)))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* theta (cos phi1))
(*.f64 (cos.f64 phi1) theta)
(* theta (+ (cos phi1) (* -1/6 (* (pow theta 2) (cos phi1)))))
(*.f64 theta (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64))))
(* theta (+ (cos phi1) (* (pow theta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow theta 2) (cos phi1)))))))
(*.f64 theta (fma.f64 (*.f64 theta theta) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 theta theta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (cos.f64 phi1)))
(* theta (+ (cos phi1) (* (pow theta 2) (+ (* -1/6 (cos phi1)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(*.f64 theta (fma.f64 (*.f64 theta theta) (fma.f64 (*.f64 theta theta) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64))) (cos.f64 phi1)))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(sin theta)
(sin.f64 theta)
(+ (sin theta) (* -1/2 (* (pow phi1 2) (sin theta))))
(*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))
(+ (sin theta) (* (pow phi1 2) (+ (* -1/2 (sin theta)) (* 1/24 (* (pow phi1 2) (sin theta))))))
(fma.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64))) (sin.f64 theta))
(+ (sin theta) (* (pow phi1 2) (+ (* -1/2 (sin theta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin theta))) (* 1/24 (sin theta)))))))
(fma.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))) (*.f64 #s(literal -1/2 binary64) (sin.f64 theta))) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
phi1
(+ phi1 (* -1/2 (* phi1 (pow theta 2))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 theta theta)) phi1)
(+ phi1 (* (pow theta 2) (+ (* -1/2 phi1) (* 1/24 (* phi1 (pow theta 2))))))
(fma.f64 (*.f64 theta theta) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 (*.f64 theta theta)) (*.f64 #s(literal -1/2 binary64) phi1)) phi1)
(+ phi1 (* (pow theta 2) (+ (* -1/2 phi1) (* (pow theta 2) (+ (* -1/720 (* phi1 (pow theta 2))) (* 1/24 phi1))))))
(fma.f64 (*.f64 theta theta) (fma.f64 (*.f64 theta theta) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 (*.f64 theta theta)) (*.f64 phi1 #s(literal 1/24 binary64))) (*.f64 #s(literal -1/2 binary64) phi1)) phi1)
(* phi1 (cos theta))
(*.f64 phi1 (cos.f64 theta))
(* phi1 (cos theta))
(*.f64 phi1 (cos.f64 theta))
(* phi1 (cos theta))
(*.f64 phi1 (cos.f64 theta))
(* phi1 (cos theta))
(*.f64 phi1 (cos.f64 theta))
(* phi1 (cos theta))
(*.f64 phi1 (cos.f64 theta))
(* phi1 (cos theta))
(*.f64 phi1 (cos.f64 theta))
(* phi1 (cos theta))
(*.f64 phi1 (cos.f64 theta))
(* phi1 (cos theta))
(*.f64 phi1 (cos.f64 theta))
(* phi1 (cos theta))
(*.f64 phi1 (cos.f64 theta))
(* phi1 (cos theta))
(*.f64 phi1 (cos.f64 theta))
(* phi1 (cos theta))
(*.f64 phi1 (cos.f64 theta))
(* phi1 (cos theta))
(*.f64 phi1 (cos.f64 theta))
(* phi1 (cos theta))
(*.f64 phi1 (cos.f64 theta))
(* phi1 (cos theta))
(*.f64 phi1 (cos.f64 theta))
(* phi1 (cos theta))
(*.f64 phi1 (cos.f64 theta))
(* phi1 (cos theta))
(*.f64 phi1 (cos.f64 theta))
(* phi1 (cos theta))
(*.f64 phi1 (cos.f64 theta))
(* phi1 (cos theta))
(*.f64 phi1 (cos.f64 theta))
(* phi1 (cos theta))
(*.f64 phi1 (cos.f64 theta))
(* phi1 (cos theta))
(*.f64 phi1 (cos.f64 theta))
(* phi1 (sin delta))
(*.f64 phi1 (sin.f64 delta))
(* phi1 (+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* -1/6 (sin delta))))))
(*.f64 phi1 (fma.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 delta) #s(literal -2/3 binary64)) (sin.f64 delta)))
(* phi1 (+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (+ (* -1/6 (sin delta)) (* (pow phi1 2) (+ (* 1/120 (sin delta)) (+ (* 1/24 (sin delta)) (* 1/12 (sin delta))))))))))
(*.f64 phi1 (fma.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 delta) #s(literal 2/15 binary64)) (*.f64 (sin.f64 delta) #s(literal -2/3 binary64))) (sin.f64 delta)))
(* phi1 (+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (+ (* -1/6 (sin delta)) (* (pow phi1 2) (+ (* 1/120 (sin delta)) (+ (* 1/24 (sin delta)) (+ (* 1/12 (sin delta)) (* (pow phi1 2) (+ (* -1/144 (sin delta)) (+ (* -1/240 (sin delta)) (+ (* -1/720 (sin delta)) (* -1/5040 (sin delta)))))))))))))))
(*.f64 phi1 (fma.f64 (*.f64 phi1 phi1) (fma.f64 (sin.f64 delta) #s(literal -2/3 binary64) (*.f64 (*.f64 phi1 phi1) (fma.f64 (sin.f64 delta) #s(literal 2/15 binary64) (*.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 delta) #s(literal -4/315 binary64)))))) (sin.f64 delta)))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))
(* delta (* (cos phi1) (sin phi1)))
(*.f64 (*.f64 delta (cos.f64 phi1)) (sin.f64 phi1))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin phi1)))) (* (cos phi1) (sin phi1))))
(*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))
(* delta (+ (* (cos phi1) (sin phi1)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin phi1))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin phi1))))))))
(*.f64 delta (fma.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))
(* delta (+ (* (cos phi1) (sin phi1)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin phi1))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin phi1)))) (* 1/120 (* (cos phi1) (sin phi1)))))))))
(*.f64 delta (fma.f64 (*.f64 delta delta) (fma.f64 (*.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))) (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64)) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))

eval259.0ms (1.4%)

Memory
4.8MiB live, 480.6MiB allocated
Compiler

Compiled 55 817 to 3 018 computations (94.6% saved)

prune368.0ms (2%)

Memory
25.2MiB live, 625.8MiB allocated
Pruning

63 alts after pruning (61 fresh and 2 done)

PrunedKeptTotal
New1 539271 566
Fresh123446
Picked505
Done123
Total1 557631 620
Accuracy
100.0%
Counts
1 620 → 63
Alt Table
Click to see full alt table
StatusAccuracyProgram
11.2%
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
30.7%
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
16.9%
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
30.7%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
25.3%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
19.4%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
14.7%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
19.8%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
35.9%
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
44.9%
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
99.8%
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
90.6%
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) lambda1)
83.0%
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) lambda1)
90.8%
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
99.8%
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1)
94.3%
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1)
81.9%
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1)
99.9%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
74.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (fma.f64 delta (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) delta) (sin.f64 theta)) (cos.f64 delta)))
73.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta)))
91.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
83.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) #s(literal 1 binary64))))
83.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
83.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
90.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)))) (*.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 #s(literal 2 binary64) (+.f64 delta phi1))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)))))))
83.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
83.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (*.f64 (cos.f64 (+.f64 phi1 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 delta)))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
94.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (cos.f64 theta)) (sin.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))))))
91.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
87.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
87.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))))))
86.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
78.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
72.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
90.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 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 delta 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 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)) (neg.f64 (cos.f64 delta)))))))
86.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
78.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 1 binary64)))
76.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
72.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
52.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (*.f64 delta delta)) (fma.f64 (cos.f64 phi1) (/.f64 (sin.f64 theta) (*.f64 delta delta)) (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64)) (sin.f64 theta)))) (cos.f64 delta)))
80.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
77.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
84.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
77.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
77.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64)))
71.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 delta)))
67.0%
(+.f64 lambda1 (atan2.f64 (*.f64 theta (fma.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 theta theta)) delta)) (cos.f64 delta)))
76.5%
(+.f64 lambda1 (atan2.f64 (*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
75.9%
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
77.2%
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
75.5%
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
76.0%
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(literal 1 binary64)))
76.5%
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
77.3%
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
76.4%
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) #s(literal 1 binary64)))
67.6%
(+.f64 lambda1 (atan2.f64 (*.f64 delta theta) (cos.f64 delta)))
94.3%
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))) lambda1)) (neg.f64 lambda1))
77.1%
(*.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) lambda1))))
Compiler

Compiled 5 296 to 1 770 computations (66.6% saved)

regimes265.0ms (1.4%)

Memory
-14.1MiB live, 374.9MiB allocated
Counts
111 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 delta theta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (fma.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 theta theta)) delta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta))) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (fma.f64 delta (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) delta) (sin.f64 theta)) (cos.f64 delta)))
(*.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) lambda1))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 delta (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 delta (*.f64 delta #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 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)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 phi1)) (-.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)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 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)) (-.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)) (fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) #s(literal 1 binary64))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (*.f64 delta delta)) (fma.f64 (cos.f64 phi1) (/.f64 (sin.f64 theta) (*.f64 delta delta)) (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64)) (sin.f64 theta)))) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1)
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (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) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (fma.f64 delta (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))) lambda1)) (neg.f64 lambda1))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (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) (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.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)) (-.f64 (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 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 (cos.f64 delta) (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))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 phi1) (sin.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 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) lambda1) lambda1)
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))) #s(literal 1 binary64))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (cos.f64 theta)) (sin.f64 delta) (*.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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 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)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 lambda1 (atan2.f64 (*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (-.f64 (cos.f64 delta) (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))))))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (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))))))
(+.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)))) (*.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 #s(literal 2 binary64) (+.f64 delta phi1))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)))))))
(+.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 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 delta 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 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)) (neg.f64 (cos.f64 delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (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 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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (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)) (-.f64 (-.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta))) (*.f64 (cos.f64 (+.f64 phi1 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 delta)))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta)))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 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 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (*.f64 (/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 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 (cos.f64 (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (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 (*.f64 (fma.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 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))) (sin.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)))))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (cos.f64 delta)))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (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))))))
Calls

7 calls:

54.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))))))))
32.0ms
theta
30.0ms
phi1
30.0ms
lambda1
30.0ms
delta
Results
AccuracySegmentsBranch
99.9%1lambda1
99.9%1phi1
99.9%1phi2
99.9%1delta
99.9%1theta
99.9%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
99.9%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)

regimes205.0ms (1.1%)

Memory
7.1MiB live, 339.9MiB allocated
Counts
93 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 delta theta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (fma.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 theta theta)) delta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta))) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (fma.f64 delta (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) delta) (sin.f64 theta)) (cos.f64 delta)))
(*.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) lambda1))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 delta (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 delta (*.f64 delta #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 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)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 phi1)) (-.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)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 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)) (-.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)) (fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) #s(literal 1 binary64))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (*.f64 delta delta)) (fma.f64 (cos.f64 phi1) (/.f64 (sin.f64 theta) (*.f64 delta delta)) (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64)) (sin.f64 theta)))) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1)
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (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) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (fma.f64 delta (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))) lambda1)) (neg.f64 lambda1))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (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) (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.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)) (-.f64 (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 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 (cos.f64 delta) (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))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 phi1) (sin.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 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) lambda1) lambda1)
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))) #s(literal 1 binary64))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (cos.f64 theta)) (sin.f64 delta) (*.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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (sin.f64 delta) (*.f64 (cos.f64 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)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (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 lambda1 (atan2.f64 (*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (-.f64 (cos.f64 delta) (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))))))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (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))))))
(+.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)))) (*.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 #s(literal 2 binary64) (+.f64 delta phi1))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)))))))
(+.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 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 delta 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 (sin.f64 (+.f64 delta phi1)) (neg.f64 (sin.f64 phi1)) (neg.f64 (cos.f64 delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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)) (-.f64 (cos.f64 delta) (fma.f64 (*.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)) (cos.f64 delta))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
Outputs
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
Calls

7 calls:

51.0ms
lambda1
26.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
25.0ms
phi2
25.0ms
theta
25.0ms
delta
Results
AccuracySegmentsBranch
99.9%1phi2
99.9%1theta
99.9%1lambda1
99.9%1phi1
99.9%1delta
99.9%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
99.9%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)

regimes176.0ms (1%)

Memory
12.1MiB live, 280.4MiB allocated
Counts
75 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 delta theta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (fma.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 theta theta)) delta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta))) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (fma.f64 delta (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) delta) (sin.f64 theta)) (cos.f64 delta)))
(*.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) lambda1))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 delta (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 delta (*.f64 delta #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 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)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 phi1)) (-.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)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 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)) (-.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)) (fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) #s(literal 1 binary64))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (*.f64 delta delta)) (fma.f64 (cos.f64 phi1) (/.f64 (sin.f64 theta) (*.f64 delta delta)) (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64)) (sin.f64 theta)))) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1)
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (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) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (fma.f64 delta (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))) lambda1)) (neg.f64 lambda1))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (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) (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.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)) (-.f64 (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 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 (cos.f64 delta) (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))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 phi1) (sin.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 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) lambda1) lambda1)
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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)))) #s(literal 1 binary64))))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
Calls

7 calls:

39.0ms
lambda1
24.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)))))))))
24.0ms
phi1
22.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
Results
AccuracySegmentsBranch
94.3%1lambda1
94.3%1phi1
94.3%1phi2
94.3%1delta
94.3%1theta
94.3%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
94.3%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes177.0ms (1%)

Memory
-13.3MiB live, 255.8MiB allocated
Counts
68 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 delta theta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (fma.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 theta theta)) delta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta))) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (fma.f64 delta (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) delta) (sin.f64 theta)) (cos.f64 delta)))
(*.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) lambda1))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 delta (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 delta (*.f64 delta #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 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)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 phi1)) (-.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)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 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)) (-.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)) (fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) #s(literal 1 binary64))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (*.f64 delta delta)) (fma.f64 (cos.f64 phi1) (/.f64 (sin.f64 theta) (*.f64 delta delta)) (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64)) (sin.f64 theta)))) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1)
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (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) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (fma.f64 delta (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (sin.f64 delta) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))) lambda1)) (neg.f64 lambda1))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (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) (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
Calls

7 calls:

36.0ms
lambda1
34.0ms
delta
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)))))))))
21.0ms
theta
20.0ms
phi2
Results
AccuracySegmentsBranch
94.3%1lambda1
94.3%1phi1
94.3%1phi2
94.3%1theta
94.3%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
94.3%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
94.3%1delta
Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes125.0ms (0.7%)

Memory
17.1MiB live, 205.8MiB allocated
Counts
59 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 delta theta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (fma.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 theta theta)) delta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta))) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (fma.f64 delta (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) delta) (sin.f64 theta)) (cos.f64 delta)))
(*.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) lambda1))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 delta (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 delta (*.f64 delta #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 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)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 phi1)) (-.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)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 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)) (-.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)) (fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) #s(literal 1 binary64))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (*.f64 delta delta)) (fma.f64 (cos.f64 phi1) (/.f64 (sin.f64 theta) (*.f64 delta delta)) (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64)) (sin.f64 theta)))) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1)
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (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) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (fma.f64 delta (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 phi1) (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
Calls

7 calls:

22.0ms
phi1
18.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)))))))))
17.0ms
phi2
17.0ms
lambda1
17.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))))))))
Results
AccuracySegmentsBranch
91.8%1lambda1
91.8%1phi1
91.8%1phi2
91.8%1theta
91.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)))))))))
91.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))))))))
91.8%1delta
Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes189.0ms (1%)

Memory
45.0MiB live, 221.8MiB allocated
Counts
54 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 delta theta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (fma.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 theta theta)) delta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta))) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (fma.f64 delta (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) delta) (sin.f64 theta)) (cos.f64 delta)))
(*.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) lambda1))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 delta (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 delta (*.f64 delta #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 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)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 phi1)) (-.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)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 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)) (-.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)) (fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) #s(literal 1 binary64))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (*.f64 delta delta)) (fma.f64 (cos.f64 phi1) (/.f64 (sin.f64 theta) (*.f64 delta delta)) (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64)) (sin.f64 theta)))) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 delta phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1)
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (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) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (fma.f64 delta (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
Calls

7 calls:

80.0ms
phi1
31.0ms
lambda1
16.0ms
theta
15.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)))))))))
14.0ms
phi2
Results
AccuracySegmentsBranch
91.7%1phi2
91.7%1lambda1
91.7%1phi1
91.7%1delta
91.7%1theta
91.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)))))))))
91.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)

regimes386.0ms (2.1%)

Memory
-245.1MiB live, 200.9MiB allocated
Counts
41 → 3
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 delta theta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (fma.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 theta theta)) delta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta))) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (fma.f64 delta (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) delta) (sin.f64 theta)) (cos.f64 delta)))
(*.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) lambda1))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 delta (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 delta (*.f64 delta #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 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)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 phi1)) (-.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)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 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)) (-.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)) (fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) #s(literal 1 binary64))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (*.f64 delta delta)) (fma.f64 (cos.f64 phi1) (/.f64 (sin.f64 theta) (*.f64 delta delta)) (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64)) (sin.f64 theta)))) (cos.f64 delta)))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
Calls

7 calls:

309.0ms
theta
14.0ms
phi2
13.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)))))))))
13.0ms
phi1
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))))))))
Results
AccuracySegmentsBranch
88.5%2phi1
91.4%3delta
91.6%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)))))))))
91.6%3(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
86.9%1lambda1
86.9%1phi2
86.9%1theta
Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes45.0ms (0.2%)

Memory
-35.1MiB live, 88.1MiB allocated
Counts
32 → 3
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 delta theta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (fma.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 theta theta)) delta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta))) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (fma.f64 delta (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) delta) (sin.f64 theta)) (cos.f64 delta)))
(*.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) lambda1))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 delta (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 delta (*.f64 delta #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 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)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 phi1)) (-.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)) (cos.f64 delta)))
Calls

3 calls:

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))))))))
10.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)))))))))
9.0ms
delta
Results
AccuracySegmentsBranch
91.4%3delta
90.3%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)))))))))
90.6%3(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
Compiler

Compiled 80 to 50 computations (37.5% saved)

regimes41.0ms (0.2%)

Memory
19.5MiB live, 98.0MiB allocated
Counts
31 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 delta theta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (fma.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 theta theta)) delta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta))) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (fma.f64 delta (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) delta) (sin.f64 theta)) (cos.f64 delta)))
(*.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) lambda1))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 delta (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 delta (*.f64 delta #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 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)) (cos.f64 delta)))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
Calls

4 calls:

11.0ms
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
11.0ms
phi1
9.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)))))))))
9.0ms
delta
Results
AccuracySegmentsBranch
86.9%1phi1
86.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)))))))))
86.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))))))))
86.9%1delta
Compiler

Compiled 86 to 55 computations (36% saved)

regimes66.0ms (0.4%)

Memory
-2.2MiB live, 154.5MiB allocated
Counts
30 → 2
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 delta theta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (fma.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 theta theta)) delta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta))) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (fma.f64 delta (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) delta) (sin.f64 theta)) (cos.f64 delta)))
(*.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) lambda1))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 delta (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 delta (*.f64 delta #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 delta (*.f64 delta #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
Calls

7 calls:

10.0ms
lambda1
10.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))))))))
9.0ms
theta
9.0ms
phi2
9.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
83.8%1lambda1
85.8%2phi1
83.8%1phi2
83.8%1delta
83.8%1theta
83.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)))))))))
83.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)

regimes16.0ms (0.1%)

Memory
-4.3MiB live, 34.4MiB allocated
Counts
24 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 delta theta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (fma.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 theta theta)) delta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta))) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (fma.f64 delta (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) delta) (sin.f64 theta)) (cos.f64 delta)))
(*.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) lambda1))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 delta (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
Calls

2 calls:

8.0ms
delta
7.0ms
phi1
Results
AccuracySegmentsBranch
83.8%1delta
83.8%1phi1
Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes93.0ms (0.5%)

Memory
10.0MiB live, 87.9MiB allocated
Counts
18 → 3
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 delta theta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (fma.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 theta theta)) delta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta))) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (fma.f64 delta (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) delta) (sin.f64 theta)) (cos.f64 delta)))
(*.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)) lambda1))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 delta (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 delta)))
Calls

7 calls:

37.0ms
phi2
26.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
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 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
lambda1
Results
AccuracySegmentsBranch
77.6%1lambda1
77.6%1phi2
81.5%3theta
81.9%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)))))))))
82.0%3(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
77.6%1phi1
80.0%2delta
Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes7.0ms (0%)

Memory
20.2MiB live, 20.2MiB allocated
Counts
7 → 3
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 delta theta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (fma.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 theta theta)) delta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 delta)))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 delta)))
Calls

2 calls:

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)))))))))
Results
AccuracySegmentsBranch
81.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)))))))))
81.6%3(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
Compiler

Compiled 74 to 45 computations (39.2% saved)

regimes15.0ms (0.1%)

Memory
-13.6MiB live, 26.3MiB allocated
Counts
6 → 3
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 delta theta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (fma.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 theta theta)) delta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
Calls

4 calls:

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))))))))
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
delta
3.0ms
theta
Results
AccuracySegmentsBranch
80.7%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)))))))))
77.3%1theta
77.3%1delta
81.0%3(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
Compiler

Compiled 86 to 55 computations (36% saved)

regimes14.0ms (0.1%)

Memory
-8.9MiB live, 29.8MiB allocated
Counts
4 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 delta theta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (fma.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 theta theta)) delta)) (cos.f64 delta)))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
Calls

5 calls:

4.0ms
phi2
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)))))))))
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
Results
AccuracySegmentsBranch
77.3%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
77.3%1phi2
77.3%1lambda1
77.3%1phi1
77.3%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
Compiler

Compiled 92 to 60 computations (34.8% saved)

regimes14.0ms (0.1%)

Memory
-1.1MiB live, 37.2MiB allocated
Counts
2 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 delta theta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) #s(literal 1 binary64)))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) #s(literal 1 binary64)))
Calls

7 calls:

3.0ms
theta
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
phi2
2.0ms
delta
Results
AccuracySegmentsBranch
76.4%1phi1
76.4%1delta
76.4%1theta
76.4%1lambda1
76.4%1phi2
76.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)))))))))
76.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)

regimes11.0ms (0.1%)

Memory
-6.7MiB live, 31.8MiB allocated
Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
1 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 delta theta) (cos.f64 delta)))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 delta theta) (cos.f64 delta)))
Calls

7 calls:

2.0ms
lambda1
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))))))))
1.0ms
delta
1.0ms
theta
Results
AccuracySegmentsBranch
67.6%1lambda1
67.6%1phi2
67.6%1delta
67.6%1theta
67.6%1phi1
67.6%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
67.6%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
Compiler

Compiled 104 to 70 computations (32.7% saved)

bsearch1.0ms (0%)

Memory
2.1MiB live, 2.1MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
3.7691878195051947e-13
8.703010490108623e-11
0.0ms
-0.4893843480695883
-0.2728404503391371
Compiler

Compiled 41 to 31 computations (24.4% saved)

bsearch82.0ms (0.4%)

Memory
12.6MiB live, 172.3MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
33.0ms
5304623123186.294
32494187137636.55
44.0ms
-1.5790545458688393e+20
-1867713694287978000.0
Samples
68.0ms208×0valid
Compiler

Compiled 574 to 434 computations (24.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 61.0ms
ival-sin: 23.0ms (37.7% of total)
ival-mult: 15.0ms (24.6% of total)
ival-cos: 14.0ms (23% of total)
ival-asin: 4.0ms (6.6% of total)
ival-add: 2.0ms (3.3% of total)
ival-atan2: 2.0ms (3.3% of total)
ival-sub: 1.0ms (1.6% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch50.0ms (0.3%)

Memory
-11.6MiB live, 105.4MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
46.0ms
-7.900498461941485e+46
-1.4525270398043695e+44
Samples
40.0ms128×0valid
Compiler

Compiled 353 to 263 computations (25.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 36.0ms
ival-sin: 18.0ms (50% of total)
ival-cos: 8.0ms (22.2% of total)
ival-mult: 5.0ms (13.9% of total)
ival-asin: 2.0ms (5.6% of total)
ival-add: 1.0ms (2.8% of total)
ival-atan2: 1.0ms (2.8% of total)
ival-sub: 1.0ms (2.8% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
1.4MiB live, 1.4MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
1.984063167330991
1.9941795862932865
0.0ms
-2.897957960845629
-2.8887960449688004
Compiler

Compiled 41 to 31 computations (24.4% saved)

bsearch0.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
8.542591921818506e-8
3.425774013134477e-7
0.0ms
-3.558408983074932e-46
-5.7270125770463515e-56
Compiler

Compiled 41 to 31 computations (24.4% saved)

bsearch0.0ms (0%)

Memory
0.8MiB live, 0.8MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
8.542591921818506e-8
3.425774013134477e-7
0.0ms
-2.6322731901517863e-22
-8.241439913317871e-23
Compiler

Compiled 41 to 31 computations (24.4% saved)

simplify21.0ms (0.1%)

Memory
9.7MiB live, 48.1MiB allocated
Algorithm
egg-herbie
Rules
86×+-commutative_binary64
82×*-commutative_binary64
48×sub-neg_binary64
36×neg-sub0_binary64
36×neg-mul-1_binary64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0135737
1206737
2256737
3299737
4321737
5330737
6332737
Stop Event
saturated
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (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))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(if (<=.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #s(literal -3602879701896397/9007199254740992 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (if (<=.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 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 4951760157141521/9903520314283042199192993792 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)))) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))))
(if (<=.f64 delta #s(literal -1900000000000000000 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (if (<=.f64 delta #s(literal 5400000000000 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 phi1)) (-.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)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
(if (<=.f64 phi1 #s(literal -43000000000000000465602578682659556572956459008 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 delta (*.f64 delta #s(literal -1/2 binary64)) #s(literal 1 binary64)))) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(if (<=.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 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 -6507701461550367/2251799813685248 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (if (<=.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 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 8962163258467287/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64))) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 delta)))))
(if (<=.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 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 -5142201741628769/25711008708143844408671393477458601640355247900524685364822016 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 delta))) (if (<=.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 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 944473296573929/9444732965739290427392 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64)))) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 delta)))))
(if (<=.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 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 -4253529586511731/21267647932558653966460912964485513216 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (if (<=.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 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 944473296573929/9444732965739290427392 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64)))) (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta theta) (cos.f64 delta)))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (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))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 theta)) (neg.f64 (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(if (<=.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #s(literal -3602879701896397/9007199254740992 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (if (<=.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 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 4951760157141521/9903520314283042199192993792 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)))) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))))
(if (<=.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))))) #s(literal -3602879701896397/9007199254740992 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (cos.f64 delta))) (if (<=.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))))) #s(literal 4951760157141521/9903520314283042199192993792 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (cos.f64 delta)))))
(if (<=.f64 delta #s(literal -1900000000000000000 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (if (<=.f64 delta #s(literal 5400000000000 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 phi1)) (-.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)) (cos.f64 delta)))))
(if (<=.f64 delta #s(literal -1900000000000000000 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (cos.f64 delta))) (if (<=.f64 delta #s(literal 5400000000000 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) delta)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (cos.f64 delta)))
(if (<=.f64 phi1 #s(literal -43000000000000000465602578682659556572956459008 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 delta (*.f64 delta #s(literal -1/2 binary64)) #s(literal 1 binary64)))) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))))
(if (<=.f64 phi1 #s(literal -43000000000000000465602578682659556572956459008 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 delta (*.f64 delta #s(literal -1/2 binary64)) #s(literal 1 binary64)))) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 delta)))
(if (<=.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 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 -6507701461550367/2251799813685248 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (if (<=.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 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 8962163258467287/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64))) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 delta)))))
(if (<=.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))))) #s(literal -6507701461550367/2251799813685248 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) delta) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (if (<=.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))))) #s(literal 8962163258467287/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 1 binary64))) (+.f64 lambda1 (atan2.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 delta)))))
(if (<=.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 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 -5142201741628769/25711008708143844408671393477458601640355247900524685364822016 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 delta))) (if (<=.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 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 944473296573929/9444732965739290427392 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64)))) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 delta)))))
(if (<=.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))))) #s(literal -5142201741628769/25711008708143844408671393477458601640355247900524685364822016 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 delta))) (if (<=.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))))) #s(literal 944473296573929/9444732965739290427392 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) delta) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64)))) (+.f64 lambda1 (atan2.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 delta)))))
(if (<=.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 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 -4253529586511731/21267647932558653966460912964485513216 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (if (<=.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 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 944473296573929/9444732965739290427392 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64)))) (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))))
(if (<=.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))))) #s(literal -4253529586511731/21267647932558653966460912964485513216 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) delta) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64)))) (if (<=.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))))) #s(literal 944473296573929/9444732965739290427392 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) delta) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64)))) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) delta) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) delta) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) delta) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta theta) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 theta delta) (cos.f64 delta)))

soundness1.6s (8.7%)

Memory
-16.4MiB live, 1 593.8MiB allocated
Rules
18 094×lower-fma.f64
18 094×lower-fma.f32
15 454×lower-fma.f64
15 454×lower-fma.f32
13 874×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
057614844
1198314193
2672014096
0828213486
022147
040139
1120139
2846139
08744133
02815807
19765684
234235625
359955582
081625302
047517685
1162317455
2561817396
0833416565
065915780
1227915311
2512915050
3717215050
0832614449
051446
099424
1369396
22951396
08436396
Stop Event
fuel
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
iter limit
node limit
Compiler

Compiled 1 932 to 945 computations (51.1% saved)

preprocess210.0ms (1.1%)

Memory
-3.0MiB live, 274.9MiB allocated
Remove

(abs phi2)

Compiler

Compiled 2 544 to 938 computations (63.1% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...