Destination given bearing on a great circle

Time bar (total: 18.4s)

analyze1.3s (6.9%)

Memory
-2.1MiB live, 1 297.6MiB allocated
Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%99.8%0.2%0%0%0%0
0%0%99.8%0.2%0%0%0%1
0%0%99.8%0.2%0%0%0%2
0%0%99.8%0.2%0%0%0%3
0%0%99.8%0.2%0%0%0%4
0%0%99.8%0.2%0%0%0%5
0%0%99.8%0.2%0%0%0%6
0%0%99.8%0.2%0%0%0%7
0%0%99.8%0.2%0%0%0%8
0%0%99.8%0.2%0%0%0%9
0%0%99.8%0.2%0%0%0%10
1.6%1.6%98.2%0.2%0%0%0%11
1.6%1.6%98.2%0.2%0%0%0%12
Compiler

Compiled 35 to 25 computations (28.6% saved)

sample2.9s (15.7%)

Memory
72.2MiB live, 2 531.3MiB allocated
Samples
2.4s8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 2.1s
ival-sin: 739.0ms (36% of total)
ival-cos: 592.0ms (28.8% of total)
ival-mult: 335.0ms (16.3% of total)
ival-asin: 147.0ms (7.2% of total)
ival-atan2: 93.0ms (4.5% of total)
ival-add: 74.0ms (3.6% of total)
ival-sub: 63.0ms (3.1% of total)
ival-true: 7.0ms (0.3% of total)
ival-assert: 3.0ms (0.1% of total)
Bogosity

preprocess279.0ms (1.5%)

Memory
15.4MiB live, 98.4MiB allocated
Algorithm
egg-herbie
Rules
1 618×distribute-rgt-in
1 602×distribute-lft-in
1 290×distribute-lft-neg-in
1 062×sub-neg
794×neg-mul-1
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0179710
1399705
2699703
31226701
42723701
54040701
64666701
75393701
85780701
95946701
106053701
116185701
126439701
136974701
147107701
157133701
167133701
177133701
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 (fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (sin.f64 theta) #s(literal 0 binary64)) #s(literal 0 binary64)) (fma.f64 (sin.f64 (asin.f64 (fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (cos.f64 theta) #s(literal 0 binary64)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) #s(literal 0 binary64))))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))
Call 2
Inputs
(+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))))
(+ (neg lambda1) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))))
(+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos (neg phi1))) (- (cos delta) (* (sin (neg phi1)) (sin (asin (+ (* (sin (neg phi1)) (cos delta)) (* (* (cos (neg phi1)) (sin delta)) (cos theta)))))))))
(+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))))
(+ lambda1 (atan2 (* (* (sin theta) (sin (neg delta))) (cos phi1)) (- (cos (neg delta)) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos (neg delta))) (* (* (cos phi1) (sin (neg delta))) (cos theta)))))))))
(+ lambda1 (atan2 (* (* (sin (neg theta)) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos (neg theta))))))))))
(neg (+ (neg lambda1) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))))
(neg (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos (neg phi1))) (- (cos delta) (* (sin (neg phi1)) (sin (asin (+ (* (sin (neg phi1)) (cos delta)) (* (* (cos (neg phi1)) (sin delta)) (cos theta))))))))))
(neg (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))))
(neg (+ lambda1 (atan2 (* (* (sin theta) (sin (neg delta))) (cos phi1)) (- (cos (neg delta)) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos (neg delta))) (* (* (cos phi1) (sin (neg delta))) (cos theta))))))))))
(neg (+ lambda1 (atan2 (* (* (sin (neg theta)) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos (neg theta)))))))))))
(+ phi1 (atan2 (* (* (sin theta) (sin delta)) (cos lambda1)) (- (cos delta) (* (sin lambda1) (sin (asin (+ (* (sin lambda1) (cos delta)) (* (* (cos lambda1) (sin delta)) (cos theta)))))))))
(+ phi2 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))))
(+ delta (atan2 (* (* (sin theta) (sin lambda1)) (cos phi1)) (- (cos lambda1) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos lambda1)) (* (* (cos phi1) (sin lambda1)) (cos theta)))))))))
(+ theta (atan2 (* (* (sin lambda1) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos lambda1)))))))))
(+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi2)) (- (cos delta) (* (sin phi2) (sin (asin (+ (* (sin phi2) (cos delta)) (* (* (cos phi2) (sin delta)) (cos theta)))))))))
(+ lambda1 (atan2 (* (* (sin theta) (sin phi1)) (cos delta)) (- (cos phi1) (* (sin delta) (sin (asin (+ (* (sin delta) (cos phi1)) (* (* (cos delta) (sin phi1)) (cos theta)))))))))
(+ lambda1 (atan2 (* (* (sin phi1) (sin delta)) (cos theta)) (- (cos delta) (* (sin theta) (sin (asin (+ (* (sin theta) (cos delta)) (* (* (cos theta) (sin delta)) (cos phi1)))))))))
(+ lambda1 (atan2 (* (* (sin theta) (sin phi2)) (cos phi1)) (- (cos phi2) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos phi2)) (* (* (cos phi1) (sin phi2)) (cos theta)))))))))
(+ lambda1 (atan2 (* (* (sin phi2) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos phi2)))))))))
(+ lambda1 (atan2 (* (* (sin delta) (sin theta)) (cos phi1)) (- (cos theta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos theta)) (* (* (cos phi1) (sin theta)) (cos delta)))))))))
Outputs
(+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))))
(+ lambda1 (atan2 (* (sin theta) (* (sin delta) (cos phi1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (cos delta) (sin phi1)) (* (sin delta) (* (cos phi1) (cos theta))))))))))
(+ (neg lambda1) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))))
(- (atan2 (* (sin theta) (* (sin delta) (cos phi1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (cos delta) (sin phi1)) (* (sin delta) (* (cos phi1) (cos theta))))))))) lambda1)
(+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos (neg phi1))) (- (cos delta) (* (sin (neg phi1)) (sin (asin (+ (* (sin (neg phi1)) (cos delta)) (* (* (cos (neg phi1)) (sin delta)) (cos theta)))))))))
(+ lambda1 (atan2 (* (sin theta) (* (sin delta) (cos phi1))) (+ (cos delta) (* (sin phi1) (sin (asin (- (* (sin delta) (* (cos phi1) (cos theta))) (* (cos delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))))
(+ lambda1 (atan2 (* (sin theta) (* (sin delta) (cos phi1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (cos delta) (sin phi1)) (* (sin delta) (* (cos phi1) (cos theta))))))))))
(+ lambda1 (atan2 (* (* (sin theta) (sin (neg delta))) (cos phi1)) (- (cos (neg delta)) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos (neg delta))) (* (* (cos phi1) (sin (neg delta))) (cos theta)))))))))
(+ lambda1 (atan2 (* (sin theta) (* (sin delta) (neg (cos phi1)))) (- (cos delta) (* (sin phi1) (sin (asin (- (* (cos delta) (sin phi1)) (* (sin delta) (* (cos phi1) (cos theta))))))))))
(+ lambda1 (atan2 (* (* (sin (neg theta)) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos (neg theta))))))))))
(+ lambda1 (atan2 (* (sin theta) (* (sin delta) (neg (cos phi1)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (cos delta) (sin phi1)) (* (sin delta) (* (cos phi1) (cos theta))))))))))
(neg (+ (neg lambda1) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))))
(- lambda1 (atan2 (* (sin theta) (* (sin delta) (cos phi1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (cos delta) (sin phi1)) (* (sin delta) (* (cos phi1) (cos theta))))))))))
(neg (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos (neg phi1))) (- (cos delta) (* (sin (neg phi1)) (sin (asin (+ (* (sin (neg phi1)) (cos delta)) (* (* (cos (neg phi1)) (sin delta)) (cos theta))))))))))
(- (neg lambda1) (atan2 (* (sin theta) (* (sin delta) (cos phi1))) (+ (cos delta) (* (sin phi1) (sin (asin (- (* (sin delta) (* (cos phi1) (cos theta))) (* (cos delta) (sin phi1)))))))))
(neg (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))))
(- (neg lambda1) (atan2 (* (sin theta) (* (sin delta) (cos phi1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (cos delta) (sin phi1)) (* (sin delta) (* (cos phi1) (cos theta))))))))))
(neg (+ lambda1 (atan2 (* (* (sin theta) (sin (neg delta))) (cos phi1)) (- (cos (neg delta)) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos (neg delta))) (* (* (cos phi1) (sin (neg delta))) (cos theta))))))))))
(- (neg lambda1) (atan2 (* (sin theta) (* (sin delta) (neg (cos phi1)))) (- (cos delta) (* (sin phi1) (sin (asin (- (* (cos delta) (sin phi1)) (* (sin delta) (* (cos phi1) (cos theta))))))))))
(neg (+ lambda1 (atan2 (* (* (sin (neg theta)) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos (neg theta)))))))))))
(- (neg lambda1) (atan2 (* (sin theta) (* (sin delta) (neg (cos phi1)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (cos delta) (sin phi1)) (* (sin delta) (* (cos phi1) (cos theta))))))))))
(+ phi1 (atan2 (* (* (sin theta) (sin delta)) (cos lambda1)) (- (cos delta) (* (sin lambda1) (sin (asin (+ (* (sin lambda1) (cos delta)) (* (* (cos lambda1) (sin delta)) (cos theta)))))))))
(+ phi1 (atan2 (* (sin theta) (* (sin delta) (cos lambda1))) (- (cos delta) (* (sin lambda1) (sin (asin (+ (* (cos delta) (sin lambda1)) (* (cos lambda1) (* (sin delta) (cos theta))))))))))
(+ phi2 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))))
(+ (atan2 (* (sin theta) (* (sin delta) (cos phi1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (cos delta) (sin phi1)) (* (sin delta) (* (cos phi1) (cos theta))))))))) phi2)
(+ delta (atan2 (* (* (sin theta) (sin lambda1)) (cos phi1)) (- (cos lambda1) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos lambda1)) (* (* (cos phi1) (sin lambda1)) (cos theta)))))))))
(+ delta (atan2 (* (sin theta) (* (cos phi1) (sin lambda1))) (- (cos lambda1) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos lambda1)) (* (cos theta) (* (cos phi1) (sin lambda1))))))))))
(+ theta (atan2 (* (* (sin lambda1) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos lambda1)))))))))
(+ theta (atan2 (* (sin delta) (* (cos phi1) (sin lambda1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (cos delta) (sin phi1)) (* (cos lambda1) (* (sin delta) (cos phi1))))))))))
(+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi2)) (- (cos delta) (* (sin phi2) (sin (asin (+ (* (sin phi2) (cos delta)) (* (* (cos phi2) (sin delta)) (cos theta)))))))))
(+ lambda1 (atan2 (* (sin theta) (* (sin delta) (cos phi2))) (- (cos delta) (* (sin phi2) (sin (asin (+ (* (cos delta) (sin phi2)) (* (sin delta) (* (cos theta) (cos phi2))))))))))
(+ lambda1 (atan2 (* (* (sin theta) (sin phi1)) (cos delta)) (- (cos phi1) (* (sin delta) (sin (asin (+ (* (sin delta) (cos phi1)) (* (* (cos delta) (sin phi1)) (cos theta)))))))))
(+ lambda1 (atan2 (* (sin theta) (* (cos delta) (sin phi1))) (- (cos phi1) (* (sin delta) (sin (asin (+ (* (sin delta) (cos phi1)) (* (cos delta) (* (sin phi1) (cos theta))))))))))
(+ lambda1 (atan2 (* (* (sin phi1) (sin delta)) (cos theta)) (- (cos delta) (* (sin theta) (sin (asin (+ (* (sin theta) (cos delta)) (* (* (cos theta) (sin delta)) (cos phi1)))))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin phi1) (cos theta))) (- (cos delta) (* (sin theta) (sin (asin (+ (* (sin delta) (* (cos phi1) (cos theta))) (* (sin theta) (cos delta)))))))))
(+ lambda1 (atan2 (* (* (sin theta) (sin phi2)) (cos phi1)) (- (cos phi2) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos phi2)) (* (* (cos phi1) (sin phi2)) (cos theta)))))))))
(+ lambda1 (atan2 (* (sin theta) (* (cos phi1) (sin phi2))) (- (cos phi2) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos phi2)) (* (cos theta) (* (cos phi1) (sin phi2))))))))))
(+ lambda1 (atan2 (* (* (sin phi2) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos phi2)))))))))
(+ lambda1 (atan2 (* (sin phi2) (* (sin delta) (cos phi1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (cos delta) (sin phi1)) (* (cos phi2) (* (sin delta) (cos phi1))))))))))
(+ lambda1 (atan2 (* (* (sin delta) (sin theta)) (cos phi1)) (- (cos theta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos theta)) (* (* (cos phi1) (sin theta)) (cos delta)))))))))
(+ lambda1 (atan2 (* (sin theta) (* (sin delta) (cos phi1))) (- (cos theta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos theta)) (* (sin theta) (* (cos phi1) (cos delta))))))))))
Symmetry

(abs phi2)

explain385.0ms (2.1%)

Memory
12.9MiB live, 364.2MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
51(-4.155725219753792e-259 -2.4956810496595024e+67 6.909760096747163e-217 -3.3155338580966534e-151 -3.888543275500584e+123)1(3.6568246152796906e+294 3.7539167145803847e+233 1.1419362262968707e+108 1.1996553109139599e+306 1.593218968860135e+232)(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
00-0-(cos.f64 theta)
00-0-theta
00-0-(sin.f64 theta)
00-0-(*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
00-0-(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
00-0-delta
00-0-(sin.f64 phi1)
00-0-(*.f64 (sin.f64 phi1) (cos.f64 delta))
00-0-lambda1
00-0-(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
00-0-(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
00-0-(*.f64 (sin.f64 theta) (sin.f64 delta))
00-0-phi1
00-0-(*.f64 (cos.f64 phi1) (sin.f64 delta))
00-0-(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
00-0-(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
00-0-(sin.f64 delta)
00-0-(sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
00-0-(cos.f64 delta)
00-0-(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
00-0-(cos.f64 phi1)
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
-.f64(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))cancellation22
Confusion
Predicted +Predicted -
+10
-1254
Precision
0.5
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+100
-12252
Precision?
0.25
Recall?
1.0
Freqs
test
numberfreq
0254
12
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
160.0ms512×0valid
Compiler

Compiled 474 to 96 computations (79.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 132.0ms
ival-cos: 40.0ms (30.4% of total)
ival-sin: 37.0ms (28.1% of total)
ival-mult: 33.0ms (25.1% of total)
ival-asin: 10.0ms (7.6% of total)
ival-add: 4.0ms (3% of total)
ival-atan2: 4.0ms (3% of total)
ival-sub: 2.0ms (1.5% 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)

prune3.0ms (0%)

Memory
-36.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)

simplify62.0ms (0.3%)

Memory
21.8MiB live, 59.7MiB allocated
Algorithm
egg-herbie
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
cost-diff0
(sin.f64 theta)
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-diff192
(+.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 (fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (sin.f64 theta) #s(literal 0 binary64)) #s(literal 0 binary64)) (fma.f64 (sin.f64 (asin.f64 (fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (cos.f64 theta) #s(literal 0 binary64)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) #s(literal 0 binary64))))) (-.f64 #s(literal 0 binary64) (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 (fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (sin.f64 theta) #s(literal 0 binary64)) #s(literal 0 binary64)) (fma.f64 (sin.f64 (asin.f64 (fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (cos.f64 theta) #s(literal 0 binary64)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) #s(literal 0 binary64))))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (sin.f64 theta) #s(literal 0 binary64)) #s(literal 0 binary64))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(fma.f64 (sin.f64 delta) (sin.f64 theta) #s(literal 0 binary64))
(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) (fma.f64 (cos.f64 phi1) (cos.f64 theta) #s(literal 0 binary64)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) #s(literal 0 binary64))))) (-.f64 #s(literal 0 binary64) (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))))))
(fma.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (cos.f64 theta) #s(literal 0 binary64)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) #s(literal 0 binary64))))) #s(literal 0 binary64))
(sin.f64 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) (fma.f64 (cos.f64 phi1) (cos.f64 theta) #s(literal 0 binary64)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) #s(literal 0 binary64)))))
(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) (fma.f64 (cos.f64 phi1) (cos.f64 theta) #s(literal 0 binary64)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) #s(literal 0 binary64))))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (cos.f64 theta) #s(literal 0 binary64)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) #s(literal 0 binary64)))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) #s(literal 0 binary64))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(fma.f64 (cos.f64 phi1) (fma.f64 (sin.f64 delta) (cos.f64 theta) #s(literal 0 binary64)) #s(literal 0 binary64))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(fma.f64 (sin.f64 delta) (cos.f64 phi1) #s(literal 0 binary64))
(cos.f64 theta)

localize97.0ms (0.5%)

Memory
13.5MiB live, 91.8MiB 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: 57.0ms
ival-sin: 20.0ms (35.1% of total)
ival-cos: 14.0ms (24.6% of total)
ival-mult: 13.0ms (22.8% of total)
ival-asin: 4.0ms (7% of total)
ival-add: 2.0ms (3.5% of total)
ival-atan2: 2.0ms (3.5% of total)
ival-sub: 1.0ms (1.8% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series28.0ms (0.1%)

Memory
-5.4MiB live, 32.3MiB allocated
Counts
8 → 264
Calls
Call 1
Inputs
#<alt (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))>
#<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)))))))))>
#<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))))))))>
#<alt (sin.f64 theta)>
#<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)))))))>
#<alt (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))>
#<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))))))>
#<alt (*.f64 (sin.f64 theta) (sin.f64 delta))>
Outputs
#<alt (* (cos theta) (sin delta))>
#<alt (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))>
#<alt (+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))>
#<alt (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta))))))) (* (cos theta) (sin delta)))>
#<alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))>
#<alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))>
#<alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))>
#<alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))>
#<alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))>
#<alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))>
#<alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))>
#<alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))>
#<alt (sin phi1)>
#<alt (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))>
#<alt (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))))>
#<alt (+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta)))))>
#<alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))>
#<alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))>
#<alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))>
#<alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))>
#<alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))>
#<alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))>
#<alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))>
#<alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))>
#<alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))>
#<alt (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))>
#<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))))))))>
#<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)))))))))>
#<alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))>
#<alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))>
#<alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))>
#<alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))>
#<alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))>
#<alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))>
#<alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))>
#<alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt lambda1>
#<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)))>
#<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)))>
#<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)))>
#<alt lambda1>
#<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)))>
#<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)))>
#<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)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt theta>
#<alt (* theta (+ 1 (* -1/6 (pow theta 2))))>
#<alt (* theta (+ 1 (* (pow theta 2) (- (* 1/120 (pow theta 2)) 1/6))))>
#<alt (* theta (+ 1 (* (pow theta 2) (- (* (pow theta 2) (+ 1/120 (* -1/5040 (pow theta 2)))) 1/6))))>
#<alt (sin theta)>
#<alt (sin theta)>
#<alt (sin theta)>
#<alt (sin theta)>
#<alt (sin theta)>
#<alt (sin theta)>
#<alt (sin theta)>
#<alt (sin theta)>
#<alt (- 1 (pow (sin phi1) 2))>
#<alt (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))>
#<alt (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))>
#<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))>
#<alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))>
#<alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))>
#<alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))>
#<alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))>
#<alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))>
#<alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))>
#<alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))>
#<alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))>
#<alt (cos delta)>
#<alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))>
#<alt (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))>
#<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)))))>
#<alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))>
#<alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))>
#<alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))>
#<alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))>
#<alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))>
#<alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))>
#<alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))>
#<alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))>
#<alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))>
#<alt (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))>
#<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)))))>
#<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)))))>
#<alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))>
#<alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))>
#<alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))>
#<alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))>
#<alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))>
#<alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))>
#<alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))>
#<alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (* phi1 (* (cos theta) (sin delta)))>
#<alt (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))>
#<alt (* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))>
#<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))))>
#<alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (pow (sin phi1) 2)>
#<alt (+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))>
#<alt (+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))>
#<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))>
#<alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))>
#<alt (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))>
#<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))))))))>
#<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)))))))))>
#<alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))>
#<alt (* theta (sin delta))>
#<alt (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))>
#<alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))>
#<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))))))))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* delta (sin theta))>
#<alt (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))>
#<alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))>
#<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))))))))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
Calls

66 calls:

TimeVariablePointExpression
4.0ms
delta
@inf
(+ (* (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
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)))
1.0ms
delta
@0
(+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))

rewrite698.0ms (3.8%)

Memory
-120.6MiB live, 437.5MiB 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
022141
040133
1120133
2846133
08744127
Stop Event
iter limit
node limit
iter limit
Counts
8 → 325
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))))))))
(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)))))))
(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 (-.f64 #s(literal 0 binary64) (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 (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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 (-.f64 #s(literal 0 binary64) (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 (-.f64 #s(literal 0 binary64) (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (+.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 #s(literal 0 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 #s(literal 0 binary64) (+.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 #s(literal 0 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 #s(literal 0 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 #s(literal 0 binary64) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 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 (-.f64 #s(literal 0 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 #s(literal 0 binary64) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 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 #s(literal 0 binary64) (+.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 (-.f64 #s(literal 0 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 (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)))) (-.f64 #s(literal 0 binary64) (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 (-.f64 #s(literal 0 binary64) (+.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 0 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 #s(literal 0 binary64) (+.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 (-.f64 #s(literal 0 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 #s(literal 0 binary64) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64))))) (-.f64 #s(literal 0 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) (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 (-.f64 #s(literal 0 binary64) (+.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 #s(literal 0 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 (neg.f64 (-.f64 #s(literal 0 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 #s(literal 0 binary64) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.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)))) (-.f64 #s(literal 0 binary64) (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 (-.f64 #s(literal 0 binary64) (+.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 #s(literal 0 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 #s(literal 0 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 #s(literal 0 binary64) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64))) (-.f64 #s(literal 0 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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 #s(literal 0 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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (-.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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)))) (-.f64 #s(literal 0 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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))) (-.f64 #s(literal 0 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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64))))) (neg.f64 (-.f64 #s(literal 0 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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))))) (neg.f64 (-.f64 #s(literal 0 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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(*.f64 (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))))
(*.f64 (-.f64 #s(literal 0 binary64) (-.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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))
(sin.f64 theta)
(+.f64 (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) (sin.f64 phi1))))
(+.f64 (*.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 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 (-.f64 #s(literal 0 binary64) (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 (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 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)))
(+.f64 (+.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 0 binary64) (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 (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))))
(+.f64 (+.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (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) (-.f64 #s(literal 0 binary64) (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)) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (fma.f64 (-.f64 #s(literal 0 binary64) (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)) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 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 (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 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 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta)))
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (-.f64 #s(literal 0 binary64) (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 (-.f64 #s(literal 0 binary64) (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 0 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))))))) (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) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (sin.f64 phi1) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (sin.f64 phi1) (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (-.f64 #s(literal 0 binary64) (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 (neg.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)))))) (cos.f64 delta))
(fma.f64 (*.f64 (-.f64 #s(literal 0 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 #s(literal 0 binary64) (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 (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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 (-.f64 #s(literal 0 binary64) (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 (-.f64 #s(literal 0 binary64) (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 (-.f64 #s(literal 0 binary64) (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 (-.f64 #s(literal 0 binary64) (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 (-.f64 #s(literal 0 binary64) (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 (-.f64 #s(literal 0 binary64) (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 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta)))
(fma.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta)))
(fma.f64 (*.f64 (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 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 (-.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 0 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 (-.f64 #s(literal 0 binary64) (-.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 (-.f64 #s(literal 0 binary64) (-.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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (-.f64 (*.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 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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (-.f64 (*.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 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 (-.f64 #s(literal 0 binary64) (-.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 0 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 0 binary64) (-.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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (-.f64 (*.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 phi1))) (cos.f64 delta)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.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 0 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) (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)))) (-.f64 #s(literal 0 binary64) (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 (-.f64 #s(literal 0 binary64) (-.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 0 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 (neg.f64 (-.f64 #s(literal 0 binary64) (-.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 (-.f64 #s(literal 0 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 (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 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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (-.f64 (*.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 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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))
(*.f64 (-.f64 #s(literal 0 binary64) (-.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 0 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 0 binary64) (-.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) (-.f64 #s(literal 0 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 (PI.f64) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 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)))) (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 (-.f64 #s(literal 0 binary64) (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) (-.f64 #s(literal 0 binary64) (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)) (-.f64 #s(literal 0 binary64) (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) (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 (-.f64 #s(literal 0 binary64) (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 (-.f64 #s(literal 0 binary64) (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) (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)) (-.f64 #s(literal 0 binary64) (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 (-.f64 #s(literal 0 binary64) (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) (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)) (-.f64 #s(literal 0 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 (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))) (sin.f64 phi1))))
(/.f64 (-.f64 #s(literal 0 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))))))) (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 (neg.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 0 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 #s(literal 0 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 #s(literal 0 binary64) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (-.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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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 (-.f64 #s(literal 0 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))))))) (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))) (-.f64 #s(literal 0 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 (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)))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (-.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 (-.f64 #s(literal 0 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))))))) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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 (-.f64 #s(literal 0 binary64) (-.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 (-.f64 #s(literal 0 binary64) (-.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 (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal -1/2 binary64))

simplify581.0ms (3.1%)

Memory
31.6MiB live, 565.7MiB allocated
Algorithm
egg-herbie
Rules
18 096×lower-fma.f64
18 096×lower-fma.f32
5 040×lower-*.f64
5 040×lower-*.f32
4 828×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02425385
18085310
226845255
348705217
470845215
081314947
Stop Event
iter limit
node limit
Counts
264 → 261
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
(* 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)
(- 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 phi1 (*.f64 (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 (cos.f64 theta) (*.f64 delta (cos.f64 phi1)) (*.f64 (fma.f64 delta (*.f64 delta #s(literal -1/2 binary64)) #s(literal 1 binary64)) (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 (*.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 (*.f64 theta 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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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 (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))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 1 binary64) 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 (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))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 1 binary64) 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 (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))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 1 binary64) 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)))
(fma.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))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 1 binary64) 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)))
(fma.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))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 1 binary64) 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)))
(fma.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))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 1 binary64) 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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))
theta
(* theta (+ 1 (* -1/6 (pow theta 2))))
(*.f64 theta (fma.f64 theta (*.f64 theta #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(* theta (+ 1 (* (pow theta 2) (- (* 1/120 (pow theta 2)) 1/6))))
(*.f64 theta (fma.f64 theta (*.f64 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))))
(*.f64 theta (fma.f64 theta (*.f64 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))) #s(literal 1 binary64)))
(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)
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 delta (cos.f64 phi1)) (sin.f64 phi1)) #s(literal 1 binary64))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(-.f64 (fma.f64 delta (fma.f64 delta (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 0 binary64)) #s(literal 0 binary64)) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (*.f64 delta (cos.f64 phi1)) (sin.f64 phi1)) #s(literal -1 binary64)))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(-.f64 (fma.f64 delta (fma.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)) #s(literal 0 binary64)) #s(literal 0 binary64)) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (*.f64 delta (cos.f64 phi1)) (sin.f64 phi1)) #s(literal -1 binary64)))
(- (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 phi1 (fma.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (sin.f64 delta)) #s(literal 0 binary64)) (cos.f64 delta))
(+ (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))) (-.f64 #s(literal 0 binary64) 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 (-.f64 #s(literal 0 binary64) (fma.f64 phi1 (fma.f64 (sin.f64 delta) (*.f64 phi1 (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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) (*.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)))))
(-.f64 (fma.f64 (*.f64 theta theta) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 phi1))) (fma.f64 (*.f64 theta theta) #s(literal -1/24 binary64) #s(literal 1/2 binary64))) (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) (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/720 binary64) #s(literal -1/24 binary64)))) #s(literal 0 binary64)) (-.f64 (cos.f64 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))))))
(- (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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 (sin.f64 delta) (*.f64 (cos.f64 theta) 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 (sin.f64 delta) (*.f64 phi1 (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))) (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 (*.f64 (cos.f64 theta) (*.f64 delta (cos.f64 phi1))) (sin.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 (cos.f64 phi1) (sin.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 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.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))))))
(+ (* (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 (cos.f64 phi1) (sin.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 (fma.f64 theta (*.f64 theta #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 theta (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 theta (*.f64 theta (fma.f64 (*.f64 theta theta) #s(literal 1/120 binary64) #s(literal -1/6 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 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 delta (sin.f64 theta)))
(* 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 (*.f64 delta delta) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)) (fma.f64 #s(literal -1/6 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
-24.2MiB live, 141.6MiB allocated
Compiler

Compiled 30 468 to 2 213 computations (92.7% saved)

prune154.0ms (0.8%)

Memory
-14.1MiB live, 111.9MiB allocated
Pruning

21 alts after pruning (21 fresh and 0 done)

PrunedKeptTotal
New56521586
Fresh000
Picked101
Done000
Total56621587
Accuracy
99.9%
Counts
587 → 21
Alt Table
Click to see full alt table
StatusAccuracyProgram
29.0%
(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))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))
46.1%
(/.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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))
37.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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))
99.7%
(/.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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))
99.8%
(+.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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)
85.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 delta (cos.f64 phi1)) (sin.f64 phi1)) #s(literal 1 binary64))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (-.f64 #s(literal 0 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 #s(literal 0 binary64) (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))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.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)))))))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.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))))))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (*.f64 (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)))))
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.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))
94.1%
(+.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)))) (-.f64 #s(literal 0 binary64) (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))))))))
95.6%
(+.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)))))))
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) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
90.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))))))))
78.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 phi1 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 phi1 (cos.f64 delta)))))))
84.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)))))
90.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
63.8%
(*.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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)))
Compiler

Compiled 2 534 to 1 040 computations (59% saved)

simplify313.0ms (1.7%)

Memory
12.6MiB live, 287.5MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))
cost-diff0
(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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
cost-diff0
(-.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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
cost-diff80960
(*.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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)))
cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #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)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))
cost-diff192
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))
cost-diff6400
(-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))))
cost-diff0
(sin.f64 theta)
cost-diff0
(*.f64 (sin.f64 theta) (sin.f64 delta))
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
(sin.f64 theta)
cost-diff0
(*.f64 (sin.f64 theta) (sin.f64 delta))
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 (-.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))))
cost-diff0
(+.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)))))
cost-diff192
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))
cost-diff6592
(-.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)))
Rules
6 926×lower-fma.f32
6 920×lower-fma.f64
2 854×lower-*.f32
2 826×lower-*.f64
1 556×lower--.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
053870
0100858
1165856
2297855
3825806
42193806
54417806
66875806
08141795
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 (-.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)))))
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 (*.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 (-.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 (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)))
(cos.f64 delta)
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))
(cos.f64 (*.f64 #s(literal 2 binary64) phi1))
(*.f64 #s(literal 2 binary64) phi1)
#s(literal 2 binary64)
(*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(cos.f64 theta)
(sin.f64 phi1)
(+.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 #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))))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #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 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))
(cos.f64 delta)
(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)))
(-.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 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(cos.f64 theta)
(sin.f64 phi1)
(*.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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(cos.f64 phi1)
phi1
(*.f64 (sin.f64 delta) (sin.f64 theta))
(sin.f64 delta)
delta
(sin.f64 theta)
theta
(fma.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 phi1)) (cos.f64 delta))
(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)
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(cos.f64 theta)
(-.f64 #s(literal 0 binary64) (sin.f64 phi1))
#s(literal 0 binary64)
#s(literal 2 binary64)
(*.f64 lambda1 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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
#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)))) (-.f64 #s(literal 0 binary64) (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 (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 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (fma.f64 (sin.f64 delta) (cos.f64 phi1) #s(literal 0 binary64))) (-.f64 (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)) #s(literal 0 binary64)) (fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 theta) (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 0 binary64)) #s(literal 0 binary64)))))
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))))
(atan2.f64 (*.f64 (sin.f64 theta) (fma.f64 (sin.f64 delta) (cos.f64 phi1) #s(literal 0 binary64))) (-.f64 (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)) #s(literal 0 binary64)) (fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 theta) (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 0 binary64)) #s(literal 0 binary64))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (fma.f64 (sin.f64 delta) (cos.f64 phi1) #s(literal 0 binary64)))
(*.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 (-.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 (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)) #s(literal 0 binary64)) (fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 theta) (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 0 binary64)) #s(literal 0 binary64)))
(-.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)))
(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)) #s(literal 0 binary64))
(cos.f64 delta)
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))
(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)) #s(literal 0 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)))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 0 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 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))
(fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 theta) (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 0 binary64)) #s(literal 0 binary64))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(fma.f64 (cos.f64 phi1) (fma.f64 (sin.f64 delta) (cos.f64 theta) #s(literal 0 binary64)) #s(literal 0 binary64))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(fma.f64 (sin.f64 delta) (cos.f64 theta) #s(literal 0 binary64))
(cos.f64 theta)
(sin.f64 phi1)
(+.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) (fma.f64 (sin.f64 delta) (cos.f64 phi1) #s(literal 0 binary64))) (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) (fma.f64 (sin.f64 delta) (cos.f64 phi1) #s(literal 0 binary64))) (cos.f64 delta))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (fma.f64 (sin.f64 delta) (cos.f64 phi1) #s(literal 0 binary64)))
(*.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) (fma.f64 (sin.f64 delta) (cos.f64 phi1) #s(literal 0 binary64))) (fma.f64 (sin.f64 (asin.f64 (fma.f64 (sin.f64 delta) (cos.f64 theta) #s(literal 0 binary64)))) (-.f64 #s(literal 0 binary64) (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) (fma.f64 (sin.f64 delta) (cos.f64 phi1) #s(literal 0 binary64))) (fma.f64 (sin.f64 (asin.f64 (fma.f64 (sin.f64 delta) (cos.f64 theta) #s(literal 0 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (fma.f64 (sin.f64 delta) (cos.f64 phi1) #s(literal 0 binary64)))
(*.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 (fma.f64 (sin.f64 delta) (cos.f64 theta) #s(literal 0 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))
(cos.f64 delta)
(*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))
(fma.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (fma.f64 (sin.f64 delta) (cos.f64 theta) #s(literal 0 binary64)))) #s(literal 0 binary64))
(sin.f64 phi1)
(sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))))
(sin.f64 (asin.f64 (fma.f64 (sin.f64 delta) (cos.f64 theta) #s(literal 0 binary64))))
(asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(asin.f64 (fma.f64 (sin.f64 delta) (cos.f64 theta) #s(literal 0 binary64)))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(fma.f64 (sin.f64 delta) (cos.f64 theta) #s(literal 0 binary64))
(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 #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 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (fma.f64 (sin.f64 delta) (cos.f64 phi1) #s(literal 0 binary64))) (-.f64 (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)) #s(literal 0 binary64)) (fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 theta) (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 0 binary64)) #s(literal 0 binary64)))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #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)))))
(atan2.f64 (*.f64 (sin.f64 theta) (fma.f64 (sin.f64 delta) (cos.f64 phi1) #s(literal 0 binary64))) (-.f64 (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)) #s(literal 0 binary64)) (fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 theta) (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 0 binary64)) #s(literal 0 binary64))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (fma.f64 (sin.f64 delta) (cos.f64 phi1) #s(literal 0 binary64)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #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 (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)) #s(literal 0 binary64)) (fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 theta) (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 0 binary64)) #s(literal 0 binary64)))
(cos.f64 delta)
(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 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 theta) (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 0 binary64)) (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)) #s(literal 0 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)))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 0 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 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))
(fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 theta) (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 0 binary64)) #s(literal 0 binary64))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(fma.f64 (cos.f64 phi1) (fma.f64 (sin.f64 delta) (cos.f64 theta) #s(literal 0 binary64)) #s(literal 0 binary64))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(fma.f64 (sin.f64 delta) (cos.f64 theta) #s(literal 0 binary64))
(cos.f64 theta)
(sin.f64 phi1)
(*.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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (fma.f64 (sin.f64 delta) (cos.f64 phi1) #s(literal 0 binary64))) (fma.f64 (fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (cos.f64 theta) #s(literal 0 binary64)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) #s(literal 0 binary64))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (fma.f64 (sin.f64 delta) (cos.f64 phi1) #s(literal 0 binary64))) (fma.f64 (fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (cos.f64 theta) #s(literal 0 binary64)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) #s(literal 0 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (fma.f64 lambda1 lambda1 #s(literal 0 binary64)))
(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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (fma.f64 (sin.f64 delta) (cos.f64 phi1) #s(literal 0 binary64))) (fma.f64 (fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (cos.f64 theta) #s(literal 0 binary64)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) #s(literal 0 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))
(atan2.f64 (*.f64 (sin.f64 theta) (fma.f64 (sin.f64 delta) (cos.f64 phi1) #s(literal 0 binary64))) (fma.f64 (fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (cos.f64 theta) #s(literal 0 binary64)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) #s(literal 0 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 theta) (fma.f64 (sin.f64 delta) (cos.f64 phi1) #s(literal 0 binary64)))
(cos.f64 phi1)
phi1
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 delta)
delta
(sin.f64 theta)
theta
(fma.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 phi1)) (cos.f64 delta))
(fma.f64 (fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (cos.f64 theta) #s(literal 0 binary64)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) #s(literal 0 binary64))) (-.f64 #s(literal 0 binary64) (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))))
(fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (cos.f64 theta) #s(literal 0 binary64)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) #s(literal 0 binary64)))
(sin.f64 phi1)
(cos.f64 delta)
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(fma.f64 (cos.f64 phi1) (fma.f64 (sin.f64 delta) (cos.f64 theta) #s(literal 0 binary64)) #s(literal 0 binary64))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(fma.f64 (sin.f64 delta) (cos.f64 theta) #s(literal 0 binary64))
(cos.f64 theta)
(-.f64 #s(literal 0 binary64) (sin.f64 phi1))
#s(literal 0 binary64)
#s(literal 2 binary64)
(*.f64 lambda1 lambda1)
(fma.f64 lambda1 lambda1 #s(literal 0 binary64))
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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (fma.f64 (sin.f64 delta) (cos.f64 phi1) #s(literal 0 binary64))) (fma.f64 (fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (cos.f64 theta) #s(literal 0 binary64)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) #s(literal 0 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
#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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (fma.f64 (sin.f64 delta) (cos.f64 phi1) #s(literal 0 binary64))) (fma.f64 (fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (cos.f64 theta) #s(literal 0 binary64)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) #s(literal 0 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)

localize412.0ms (2.2%)

Memory
36.4MiB live, 427.9MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy99.7%
(*.f64 (sin.f64 delta) (sin.f64 theta))
accuracy99.7%
(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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
accuracy99.1%
(fma.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 phi1)) (cos.f64 delta))
accuracy63.9%
(*.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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)))
accuracy99.7%
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy99.7%
(*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))
accuracy99.3%
(-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))))
accuracy75.0%
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))
accuracy99.7%
(*.f64 (cos.f64 theta) (sin.f64 delta))
accuracy99.7%
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy99.7%
(asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))
accuracy99.6%
(*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))
accuracy100.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
accuracy99.9%
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))
accuracy99.8%
(*.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 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))
accuracy99.2%
(-.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)))
accuracy75.0%
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))
Samples
154.0ms128×1valid
97.0ms128×0valid
Compiler

Compiled 872 to 58 computations (93.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 200.0ms
ival-cos: 41.0ms (20.5% of total)
ival-mult: 36.0ms (18% of total)
ival-atan2: 35.0ms (17.5% of total)
ival-sin: 27.0ms (13.5% of total)
adjust: 18.0ms (9% of total)
ival-sub: 15.0ms (7.5% of total)
ival-add: 11.0ms (5.5% of total)
ival-asin: 9.0ms (4.5% of total)
ival-pow2: 4.0ms (2% of total)
ival-div: 3.0ms (1.5% of total)
exact: 1.0ms (0.5% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series114.0ms (0.6%)

Memory
-17.0MiB live, 61.5MiB allocated
Counts
24 → 828
Calls
Call 1
Inputs
#<alt (-.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)))>
#<alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))>
#<alt (+.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)))))>
#<alt (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))))>
#<alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))>
#<alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))>
#<alt (*.f64 (sin.f64 theta) (sin.f64 delta))>
#<alt (sin.f64 theta)>
#<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))))))))>
#<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)))))))>
#<alt (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))))>
#<alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))>
#<alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #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)))))>
#<alt (*.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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)))>
#<alt (-.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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))>
#<alt (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))>
#<alt (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))>
#<alt (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))>
#<alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))>
#<alt (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))))>
#<alt (asin.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)))>
#<alt (*.f64 (cos.f64 theta) (sin.f64 delta))>
#<alt (fma.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 phi1)) (cos.f64 delta))>
#<alt (*.f64 (sin.f64 delta) (sin.f64 theta))>
Outputs
#<alt (+ 1/2 (* 1/2 (cos (* 2 phi1))))>
#<alt (+ 1/2 (+ (* -1 (* (pow delta 2) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* 1/2 (cos (* 2 phi1)))))>
#<alt (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))>
#<alt (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))>
#<alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (cos delta)>
#<alt (+ (cos delta) (* -1 (* (pow phi1 2) (cos delta))))>
#<alt (+ (cos delta) (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta))))>
#<alt (+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta))))>
#<alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (pow phi1 2)>
#<alt (* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))>
#<alt (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))>
#<alt (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))>
#<alt (- 1/2 (* 1/2 (cos (* 2 phi1))))>
#<alt (- 1/2 (* 1/2 (cos (* 2 phi1))))>
#<alt (- 1/2 (* 1/2 (cos (* 2 phi1))))>
#<alt (- 1/2 (* 1/2 (cos (* 2 phi1))))>
#<alt (- 1/2 (* 1/2 (cos (* 2 phi1))))>
#<alt (- 1/2 (* 1/2 (cos (* 2 phi1))))>
#<alt (- 1/2 (* 1/2 (cos (* 2 phi1))))>
#<alt (- 1/2 (* 1/2 (cos (* 2 phi1))))>
#<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)))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<alt lambda1>
#<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)))>
#<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)))>
#<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)))>
#<alt lambda1>
#<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)))>
#<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)))>
#<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)))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt lambda1>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) lambda1)))>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) lambda1)))>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) lambda1)))>
#<alt lambda1>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) lambda1)) 1)))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) lambda1)) 1)))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)) lambda1)) 1)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (cos delta))>
#<alt (* theta (sin delta))>
#<alt (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))>
#<alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))>
#<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))))))))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* delta (sin theta))>
#<alt (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))>
#<alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))>
#<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))))))))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt theta>
#<alt (* theta (+ 1 (* -1/6 (pow theta 2))))>
#<alt (* theta (+ 1 (* (pow theta 2) (- (* 1/120 (pow theta 2)) 1/6))))>
#<alt (* theta (+ 1 (* (pow theta 2) (- (* (pow theta 2) (+ 1/120 (* -1/5040 (pow theta 2)))) 1/6))))>
#<alt (sin theta)>
#<alt (sin theta)>
#<alt (sin theta)>
#<alt (sin theta)>
#<alt (sin theta)>
#<alt (sin theta)>
#<alt (sin theta)>
#<alt (sin theta)>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt lambda1>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) lambda1)))>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) lambda1)))>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) lambda1)))>
#<alt lambda1>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) lambda1)) 1)))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) lambda1)) 1)))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))) lambda1)) 1)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (+ 1/2 (* 1/2 (cos (* 2 phi1))))>
#<alt (+ 1/2 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (cos (* 2 phi1)))))>
#<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)))))))>
#<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)))))))>
#<alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (cos delta)>
#<alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))>
#<alt (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))>
#<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)))))>
#<alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))>
#<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)))))>
#<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)))))>
#<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)))))>
#<alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<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)))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<alt lambda1>
#<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)))>
#<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)))>
#<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)))>
#<alt lambda1>
#<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)))>
#<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)))>
#<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)))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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))))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt lambda1>
#<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)))>
#<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)))>
#<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)))>
#<alt lambda1>
#<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)))>
#<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)))>
#<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)))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (+ (* -1 (pow lambda1 2)) (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2))>
#<alt (+ (* -1 (pow lambda1 2)) (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2))>
#<alt (+ (* -1 (pow lambda1 2)) (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2))>
#<alt (* -1 (pow lambda1 2))>
#<alt (* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) 1))>
#<alt (* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) 1))>
#<alt (* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) 1))>
#<alt (* -1 (pow lambda1 2))>
#<alt (* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) 1))>
#<alt (* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) 1))>
#<alt (* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) 1))>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (* phi1 (* (cos theta) (sin delta)))>
#<alt (* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))>
#<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)))))))))))>
#<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))))))))))))))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* delta (* (cos phi1) (* (cos theta) (sin phi1))))>
#<alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* (cos phi1) (* (cos theta) (sin phi1)))))>
#<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)))))))))>
#<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))))))))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (sin delta) (sin phi1)))>
#<alt (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))>
#<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))))))))>
#<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)))))))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* theta (* (cos phi1) (sin delta)))>
#<alt (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))>
#<alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))>
#<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)))))))))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* delta (* (cos phi1) (sin theta)))>
#<alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))>
#<alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))>
#<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)))))))))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (sin delta) (sin theta))>
#<alt (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))>
#<alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))>
#<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))))))))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* phi1 (* (cos theta) (sin delta)))>
#<alt (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* (cos theta) (sin delta))))>
#<alt (* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/6 (* (cos theta) (sin delta))) (* 1/120 (* (pow phi1 2) (* (cos theta) (sin delta))))))))>
#<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)))))))))>
#<alt (* (cos theta) (* (sin delta) (sin phi1)))>
#<alt (* (cos theta) (* (sin delta) (sin phi1)))>
#<alt (* (cos theta) (* (sin delta) (sin phi1)))>
#<alt (* (cos theta) (* (sin delta) (sin phi1)))>
#<alt (* (cos theta) (* (sin delta) (sin phi1)))>
#<alt (* (cos theta) (* (sin delta) (sin phi1)))>
#<alt (* (cos theta) (* (sin delta) (sin phi1)))>
#<alt (* (cos theta) (* (sin delta) (sin phi1)))>
#<alt (* (sin delta) (sin phi1))>
#<alt (+ (* -1/2 (* (pow theta 2) (* (sin delta) (sin phi1)))) (* (sin delta) (sin phi1)))>
#<alt (+ (* (sin delta) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (sin phi1))) (* 1/24 (* (pow theta 2) (* (sin delta) (sin phi1)))))))>
#<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))))))))>
#<alt (* (cos theta) (* (sin delta) (sin phi1)))>
#<alt (* (cos theta) (* (sin delta) (sin phi1)))>
#<alt (* (cos theta) (* (sin delta) (sin phi1)))>
#<alt (* (cos theta) (* (sin delta) (sin phi1)))>
#<alt (* (cos theta) (* (sin delta) (sin phi1)))>
#<alt (* (cos theta) (* (sin delta) (sin phi1)))>
#<alt (* (cos theta) (* (sin delta) (sin phi1)))>
#<alt (* (cos theta) (* (sin delta) (sin phi1)))>
#<alt (* delta (* (cos theta) (sin phi1)))>
#<alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos theta) (sin phi1)))) (* (cos theta) (sin phi1))))>
#<alt (* delta (+ (* (cos theta) (sin phi1)) (* (pow delta 2) (+ (* -1/6 (* (cos theta) (sin phi1))) (* 1/120 (* (pow delta 2) (* (cos theta) (sin phi1))))))))>
#<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)))))))))>
#<alt (* (cos theta) (* (sin delta) (sin phi1)))>
#<alt (* (cos theta) (* (sin delta) (sin phi1)))>
#<alt (* (cos theta) (* (sin delta) (sin phi1)))>
#<alt (* (cos theta) (* (sin delta) (sin phi1)))>
#<alt (* (cos theta) (* (sin delta) (sin phi1)))>
#<alt (* (cos theta) (* (sin delta) (sin phi1)))>
#<alt (* (cos theta) (* (sin delta) (sin phi1)))>
#<alt (* (cos theta) (* (sin delta) (sin phi1)))>
#<alt (asin (* (cos theta) (sin delta)))>
#<alt (asin (* (cos theta) (sin delta)))>
#<alt (asin (* (cos theta) (sin delta)))>
#<alt (asin (* (cos theta) (sin delta)))>
#<alt (asin (* (cos theta) (sin delta)))>
#<alt (asin (* (cos theta) (sin delta)))>
#<alt (asin (* (cos theta) (sin delta)))>
#<alt (asin (* (cos theta) (sin delta)))>
#<alt (asin (* (cos theta) (sin delta)))>
#<alt (asin (* (cos theta) (sin delta)))>
#<alt (asin (* (cos theta) (sin delta)))>
#<alt (asin (* (cos theta) (sin delta)))>
#<alt (asin (* (cos theta) (sin delta)))>
#<alt (asin (* (cos theta) (sin delta)))>
#<alt (asin (* (cos theta) (sin delta)))>
#<alt (asin (* (cos theta) (sin delta)))>
#<alt (asin (* (cos theta) (sin delta)))>
#<alt (asin (* (cos theta) (sin delta)))>
#<alt (asin (* (cos theta) (sin delta)))>
#<alt (asin (* (cos theta) (sin delta)))>
#<alt (asin (* (cos theta) (sin delta)))>
#<alt (asin (* (cos theta) (sin delta)))>
#<alt (asin (* (cos theta) (sin delta)))>
#<alt (asin (* (cos theta) (sin delta)))>
#<alt (sin delta)>
#<alt (+ (sin delta) (* -1/2 (* (pow theta 2) (sin delta))))>
#<alt (+ (sin delta) (* (pow theta 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow theta 2) (sin delta))))))>
#<alt (+ (sin delta) (* (pow theta 2) (+ (* -1/2 (sin delta)) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (sin delta))) (* 1/24 (sin delta)))))))>
#<alt (* (cos theta) (sin delta))>
#<alt (* (cos theta) (sin delta))>
#<alt (* (cos theta) (sin delta))>
#<alt (* (cos theta) (sin delta))>
#<alt (* (cos theta) (sin delta))>
#<alt (* (cos theta) (sin delta))>
#<alt (* (cos theta) (sin delta))>
#<alt (* (cos theta) (sin delta))>
#<alt (* delta (cos theta))>
#<alt (* delta (+ (cos theta) (* -1/6 (* (pow delta 2) (cos theta)))))>
#<alt (* delta (+ (cos theta) (* (pow delta 2) (+ (* -1/6 (cos theta)) (* 1/120 (* (pow delta 2) (cos theta)))))))>
#<alt (* delta (+ (cos theta) (* (pow delta 2) (+ (* -1/6 (cos theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos theta))) (* 1/120 (cos theta))))))))>
#<alt (* (cos theta) (sin delta))>
#<alt (* (cos theta) (sin delta))>
#<alt (* (cos theta) (sin delta))>
#<alt (* (cos theta) (sin delta))>
#<alt (* (cos theta) (sin delta))>
#<alt (* (cos theta) (sin delta))>
#<alt (* (cos theta) (sin delta))>
#<alt (* (cos theta) (sin delta))>
#<alt (cos delta)>
#<alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))>
#<alt (+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))>
#<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)))))))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ 1 (* -1 (pow (sin phi1) 2)))>
#<alt (+ 1 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* -1 (pow (sin phi1) 2))))>
#<alt (+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/2 (pow (sin phi1) 2)) 1/2))))))>
#<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))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))>
#<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)))))))>
#<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))))))))>
#<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)))))))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (* delta (sin theta))>
#<alt (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))>
#<alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))>
#<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))))))))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* theta (sin delta))>
#<alt (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))>
#<alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))>
#<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))))))))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
Calls

207 calls:

TimeVariablePointExpression
10.0ms
delta
@inf
(- (cos delta) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta)))
7.0ms
theta
@inf
(* (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (- 0 (sin phi1))) (cos delta))) 2) (* lambda1 lambda1)) (/ 1 (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (- 0 (sin phi1))) (cos delta))) lambda1)))
3.0ms
delta
@0
(- (cos delta) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta)))
2.0ms
delta
@inf
(* (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (- 0 (sin phi1))) (cos delta))) 2) (* lambda1 lambda1)) (/ 1 (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (- 0 (sin phi1))) (cos delta))) lambda1)))
2.0ms
phi1
@0
(* (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (- 0 (sin phi1))) (cos delta))) 2) (* lambda1 lambda1)) (/ 1 (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (- 0 (sin phi1))) (cos delta))) lambda1)))

rewrite403.0ms (2.2%)

Memory
15.5MiB live, 520.2MiB allocated
Algorithm
batch-egg-rewrite
Rules
4 242×lower-*.f32
4 214×lower-*.f64
3 388×lower-/.f32
3 386×lower-/.f64
2 880×lower-fma.f32
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
053495
0100479
1386416
22830416
08345416
Stop Event
iter limit
node limit
iter limit
Counts
24 → 487
Calls
Call 1
Inputs
(-.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 #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 (-.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)))))
(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 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 (sin.f64 theta) (sin.f64 delta))
(sin.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 (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 #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 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #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 (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))
(*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.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 (cos.f64 theta) (sin.f64 delta))
(fma.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 phi1)) (cos.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
Outputs
(+.f64 (cos.f64 delta) (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(+.f64 (-.f64 #s(literal 0 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) (*.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))))
(fma.f64 (cos.f64 delta) (-.f64 #s(literal 0 binary64) (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 (-.f64 #s(literal 0 binary64) (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 (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))
(/.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 #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 (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 #s(literal 0 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 #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 #s(literal 0 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 (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 #s(literal 0 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 #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 #s(literal 0 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 (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)))))
(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 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #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 0 binary64))
(+.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (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 #s(literal 2 binary64) phi1)))))) (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 (sin.f64 phi1) (sin.f64 phi1) #s(literal 0 binary64))
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 0 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 (+.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))) #s(literal 0 binary64))
(fma.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 #s(literal 2 binary64) phi1))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 0 binary64))
(fma.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 #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 #s(literal 2 binary64) phi1)))))))))
(/.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 #s(literal 2 binary64) 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))) (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 #s(literal 2 binary64) phi1)))))) (*.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 #s(literal 2 binary64) phi1))))))) (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 #s(literal 2 binary64) phi1))))))) (-.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 (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 #s(literal 2 binary64) phi1)))))) (*.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 #s(literal 2 binary64) phi1)))))))) (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 #s(literal 2 binary64) phi1)))))))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (+.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)) #s(literal 0 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 0 binary64)))))
(/.f64 (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 0 binary64)) (-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 0 binary64)))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.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 #s(literal 2 binary64) phi1)))))))) (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 #s(literal 2 binary64) phi1))))))))) (neg.f64 (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 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (neg.f64 (+.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)) #s(literal 0 binary64))) (neg.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 0 binary64))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 0 binary64))) (neg.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 0 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow.f64 (-.f64 #s(literal 0 binary64) (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 #s(literal 2 binary64) phi1)))))))) #s(literal -1 binary64))
(*.f64 (sin.f64 phi1) (sin.f64 phi1))
(*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (-.f64 #s(literal 0 binary64) (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 #s(literal 2 binary64) phi1))))))) (/.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 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) lambda1))) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) lambda1))) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) lambda1))))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) 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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) 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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) lambda1)))
(pow.f64 (/.f64 (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) lambda1))) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) lambda1)))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)))
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) lambda1)
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) 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))) (cos.f64 delta)) #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))) (cos.f64 delta))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) 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))) (cos.f64 delta)) #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))) (cos.f64 delta))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (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))) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) 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))) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (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 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) lambda1))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (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)))))
(/.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))) (cos.f64 delta)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (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 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (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))) (cos.f64 delta)) lambda1)))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) 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))) (cos.f64 delta)) #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))) (cos.f64 delta))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (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 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (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 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 delta theta)) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #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 delta theta)) (cos.f64 (+.f64 delta theta)))))
(/.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 delta theta)) (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 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))))
(/.f64 (neg.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 (-.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 (-.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 (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 delta theta)) (cos.f64 (+.f64 delta theta)))) #s(literal -1 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 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))
(sin.f64 theta)
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(/.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 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #s(literal 2 binary64)))))
(/.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 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))))
(/.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 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(+.f64 (cos.f64 delta) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(+.f64 (cos.f64 delta) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)))
(+.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(-.f64 (cos.f64 delta) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))))
(-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (+.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (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)) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (/.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(-.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (/.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)))
(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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (cos.f64 delta))
(fma.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))))
(fma.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1) (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64)))))
(/.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (+.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 3 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (+.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))))))
(/.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 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 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))))
(/.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(/.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))))))))
(/.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (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 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 delta) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))))
(/.f64 (-.f64 #s(literal 2 binary64) (*.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 (cos.f64 phi1) (-.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 (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 2 binary64)))
(/.f64 (-.f64 #s(literal 2 binary64) (*.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 (cos.f64 phi1) (-.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 (*.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 2 binary64)))
(/.f64 (-.f64 (*.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))) #s(literal 2 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 (cos.f64 phi1) (-.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 (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 (+.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 2 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 (cos.f64 phi1) (-.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 (+.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 (-.f64 (*.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)))) #s(literal 2 binary64)) (*.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 (cos.f64 phi1) (-.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 (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 (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)))) #s(literal 2 binary64)) (*.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 (cos.f64 phi1) (-.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 (+.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 (-.f64 (*.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))) #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 (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 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (*.f64 (cos.f64 phi1) (-.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 (+.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 #s(literal 0 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 (*.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))) #s(literal 2 binary64)) (*.f64 (-.f64 (cos.f64 delta) (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 phi1) (-.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 (cos.f64 delta) (-.f64 #s(literal 0 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 (*.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (+.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (+.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (+.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (*.f64 (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)))) (*.f64 (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(/.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (*.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))))
(/.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(/.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(pow.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64)))) #s(literal -1 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (+.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(*.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (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)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(*.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) lambda1))) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) lambda1))) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) lambda1))))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) 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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) 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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) lambda1)))
(pow.f64 (/.f64 (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) lambda1))) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) lambda1)))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (-.f64 #s(literal 0 binary64) (*.f64 lambda1 lambda1))))
(+.f64 (*.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))) (*.f64 (-.f64 #s(literal 0 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 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)))
(fma.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (*.f64 (-.f64 #s(literal 0 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 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))))
(fma.f64 (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (-.f64 #s(literal 0 binary64) (*.f64 lambda1 lambda1))))
(fma.f64 (sqrt.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) (sqrt.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) lambda1)
(fma.f64 (pow.f64 (sqrt.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal 1 binary64)) lambda1)
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (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 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (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 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))) (*.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))) (*.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)))
(/.f64 (*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))) #s(literal -1 binary64)) (*.f64 (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))))
(/.f64 (*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))) #s(literal 1 binary64)) (*.f64 (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)))
(/.f64 (*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))) #s(literal -1 binary64)) (*.f64 (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))) (*.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))))
(/.f64 (*.f64 #s(literal -1 binary64) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)))))
(/.f64 (*.f64 #s(literal -1 binary64) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (-.f64 #s(literal 0 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))))) (neg.f64 (*.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))) (neg.f64 (*.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (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 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))))) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64))))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal -1 binary64) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (-.f64 #s(literal 0 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)))
(/.f64 (-.f64 (*.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (*.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))) (*.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)) (*.f64 lambda1 (*.f64 lambda1 lambda1)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))) #s(literal 1 binary64))) (neg.f64 (*.f64 (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))) #s(literal -1 binary64))) (neg.f64 (*.f64 (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))) #s(literal 1 binary64))) (neg.f64 (*.f64 (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))) #s(literal -1 binary64))) (neg.f64 (*.f64 (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))))) (neg.f64 (*.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))))) (neg.f64 (*.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 #s(literal -1 binary64) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))))) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64))))))
(/.f64 (neg.f64 (*.f64 #s(literal -1 binary64) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))))) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #s(literal -1 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))))) (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))))) (neg.f64 (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)))) (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)))) (neg.f64 (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(literal -1 binary64) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))))
(pow.f64 (/.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) #s(literal -1 binary64))
(*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (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 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)))
(*.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))
(*.f64 (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(*.f64 (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)) (*.f64 lambda1 (*.f64 lambda1 lambda1)))) (fma.f64 lambda1 (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))))
(+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 lambda1 lambda1)))
(+.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (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 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64)) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)))) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))))
(fma.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))
(fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) (-.f64 #s(literal 0 binary64) (*.f64 lambda1 lambda1)))
(fma.f64 #s(literal -1 binary64) (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64))) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64))) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)) (*.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 lambda1 lambda1))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (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 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 lambda1 lambda1))))
(/.f64 (*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))) #s(literal 1 binary64)) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))) #s(literal 1 binary64)) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))))) (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)) (*.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 lambda1 lambda1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))) (neg.f64 (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))) (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 lambda1 lambda1)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64)) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64))) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64))) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))) (*.f64 (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))) (*.f64 (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))) #s(literal 1 binary64))) (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))) #s(literal 1 binary64))) (neg.f64 (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (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 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))))) (neg.f64 (neg.f64 (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))))))
(pow.f64 (/.f64 (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64))) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))) #s(literal -1 binary64))
(*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (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 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)))))
(*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))))
(*.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))) #s(literal 1 binary64)))
(pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))
(exp.f64 (log.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 1 binary64))
(pow.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal 2 binary64))
(*.f64 (sqrt.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) (sqrt.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(*.f64 (pow.f64 (sqrt.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal 1 binary64)))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))
(/.f64 (*.f64 (cos.f64 phi1) (-.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 (cos.f64 phi1) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))
(*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (cos.f64 phi1))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(*.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta 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 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #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 delta theta)) (cos.f64 (+.f64 delta 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 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1))) #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 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 delta) (cos.f64 phi1)) (sin.f64 theta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.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 #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 (-.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 (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 (-.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 (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 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(*.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) (sin.f64 delta)) (cos.f64 theta))
(*.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 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (acos.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (acos.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(cos.f64 (acos.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))))
(-.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) #s(literal 2 binary64))))))
(-.f64 (*.f64 (sin.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))))) #s(literal 0 binary64)) (*.f64 (cos.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))))) #s(literal 1 binary64)))
(sin.f64 (asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))))
(fma.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(fma.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (acos.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))))) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (acos.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))
(/.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta))) #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta))))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta))))) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))) #s(literal -1 binary64))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(*.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))
(+.f64 (cos.f64 delta) (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.f64 (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (cos.f64 delta))
(-.f64 (/.f64 (pow.f64 (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (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 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (neg.f64 (cos.f64 delta)))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (pow.f64 (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64))) (+.f64 (neg.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64))) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.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 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (pow.f64 (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64))) (+.f64 (neg.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (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 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.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 (neg.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (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) (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (pow.f64 (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (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 (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))))
(/.f64 (-.f64 (pow.f64 (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.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))))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (neg.f64 (cos.f64 delta))))
(/.f64 (neg.f64 (+.f64 (neg.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (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) (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (pow.f64 (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (neg.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (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 (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.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)))))) (neg.f64 (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (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)))) (pow.f64 (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (neg.f64 (cos.f64 delta)))) (*.f64 (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (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 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (neg.f64 (cos.f64 delta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (neg.f64 (cos.f64 delta)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (neg.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (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) (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (pow.f64 (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.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))))))) (neg.f64 (neg.f64 (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (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)))) (pow.f64 (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 delta) (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(pow.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (pow.f64 (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64))) (+.f64 (neg.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (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 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.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)))))) #s(literal -1 binary64))
(*.f64 (+.f64 (neg.f64 (pow.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (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) (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (pow.f64 (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.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 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (neg.f64 (cos.f64 delta)))))
(-.f64 (/.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 delta theta)) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #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 delta theta)) (cos.f64 (+.f64 delta theta)))))
(/.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 delta theta)) (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 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))))
(/.f64 (neg.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 (-.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 (-.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 (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 delta theta)) (cos.f64 (+.f64 delta theta)))) #s(literal -1 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 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))

simplify833.0ms (4.5%)

Memory
1.7MiB live, 799.7MiB allocated
Algorithm
egg-herbie
Rules
14 142×lower-fma.f64
14 142×lower-fma.f32
8 192×lower-*.f64
8 192×lower-*.f32
3 440×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
051420332
1176719833
2618819734
0833418921
Stop Event
iter limit
node limit
Counts
828 → 817
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 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(cos delta)
(+ (cos delta) (* -1 (* (pow phi1 2) (cos delta))))
(+ (cos delta) (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta))))
(+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(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 (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))
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 (* (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)))))))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -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
(* 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)))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(+ (* -1 (pow lambda1 2)) (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2))
(+ (* -1 (pow lambda1 2)) (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2))
(+ (* -1 (pow lambda1 2)) (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2))
(* -1 (pow lambda1 2))
(* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) 1))
(* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) 1))
(* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) 1))
(* -1 (pow lambda1 2))
(* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) 1))
(* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) 1))
(* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) 1))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(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))))))))
(* 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))))
(* 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)))
(* 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)))
(sin delta)
(+ (sin delta) (* -1/2 (* (pow theta 2) (sin delta))))
(+ (sin delta) (* (pow theta 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow theta 2) (sin delta))))))
(+ (sin delta) (* (pow theta 2) (+ (* -1/2 (sin delta)) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (sin delta))) (* 1/24 (sin delta)))))))
(* (cos theta) (sin delta))
(* (cos theta) (sin delta))
(* (cos theta) (sin delta))
(* (cos theta) (sin delta))
(* (cos theta) (sin delta))
(* (cos theta) (sin delta))
(* (cos theta) (sin delta))
(* (cos theta) (sin delta))
(* delta (cos theta))
(* delta (+ (cos theta) (* -1/6 (* (pow delta 2) (cos theta)))))
(* delta (+ (cos theta) (* (pow delta 2) (+ (* -1/6 (cos theta)) (* 1/120 (* (pow delta 2) (cos theta)))))))
(* delta (+ (cos theta) (* (pow delta 2) (+ (* -1/6 (cos theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos theta))) (* 1/120 (cos theta))))))))
(* (cos theta) (sin delta))
(* (cos theta) (sin delta))
(* (cos theta) (sin delta))
(* (cos theta) (sin delta))
(* (cos theta) (sin delta))
(* (cos theta) (sin delta))
(* (cos theta) (sin delta))
(* (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)))))))
(+ 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) (* -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)))))))
(* 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))
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 (* (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 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))
(fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/24 binary64) #s(literal 1/24 binary64)) (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))) (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))) (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))
(fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/24 binary64) (fma.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/720 binary64) #s(literal 1/720 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 delta delta)) #s(literal 1/24 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))) (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))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 delta)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 delta)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 delta)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 delta)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 delta)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 delta)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 delta)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 delta)) (cos.f64 delta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* (pow phi1 2) (cos delta))))
(*.f64 (fma.f64 phi1 (-.f64 #s(literal 0 binary64) 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 (*.f64 phi1 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 (*.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 delta)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 delta)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 delta)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 delta)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 delta)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 delta)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 delta)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 delta)) (cos.f64 delta))
(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 phi1 (*.f64 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(*.f64 (-.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) lambda1)) (-.f64 #s(literal 0 binary64) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) lambda1)) (-.f64 #s(literal 0 binary64) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) lambda1)) (-.f64 #s(literal 0 binary64) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))))))
(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)) (-.f64 #s(literal 0 binary64) 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)) (-.f64 #s(literal 0 binary64) 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)) (-.f64 #s(literal 0 binary64) 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 (sin delta))
(*.f64 (sin.f64 delta) theta)
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(*.f64 (sin.f64 delta) (*.f64 theta (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(*.f64 theta (*.f64 (sin.f64 delta) (+.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 theta theta) #s(literal 1/120 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 (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 (*.f64 delta 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 (*.f64 (sin.f64 theta) (+.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 delta delta) #s(literal 1/120 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 (fma.f64 (*.f64 delta 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
(* theta (+ 1 (* -1/6 (pow theta 2))))
(*.f64 theta (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)))
(* theta (+ 1 (* (pow theta 2) (- (* 1/120 (pow theta 2)) 1/6))))
(*.f64 theta (fma.f64 theta (*.f64 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))))
(*.f64 theta (fma.f64 (*.f64 theta theta) (fma.f64 theta (*.f64 theta (fma.f64 (*.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(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 (* (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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))) 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))) 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))) 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))) lambda1)) (-.f64 #s(literal 0 binary64) 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))) lambda1)) (-.f64 #s(literal 0 binary64) 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))) lambda1)) (-.f64 #s(literal 0 binary64) 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(+ 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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(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 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (cos (* 2 phi1)))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 delta (sin.f64 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)))))))
(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 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (-.f64 #s(literal 0 binary64) (cos.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 (fma.f64 delta (fma.f64 delta (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) #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 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (-.f64 #s(literal 0 binary64) (cos.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))
(- (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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))
(- (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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))
(- (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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))
(- (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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))
(- (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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))
(- (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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))
(- (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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 phi1 (cos.f64 theta))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (fma.f64 phi1 (-.f64 #s(literal 0 binary64) phi1) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (cos.f64 theta)))))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (fma.f64 phi1 (-.f64 #s(literal 0 binary64) (cos.f64 delta)) (neg.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)))))) (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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))
(- (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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))
(- (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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))
(- (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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))
(- (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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))
(- (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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))
(- (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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))
(- (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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))
(- (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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(-.f64 (fma.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (*.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(-.f64 (fma.f64 (*.f64 theta theta) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(-.f64 (fma.f64 (*.f64 theta theta) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))))
(- (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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))
(- (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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))
(- (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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))
(- (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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))
(- (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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))
(- (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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))
(- (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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))
(- (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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(*.f64 (-.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) lambda1)) (-.f64 #s(literal 0 binary64) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) lambda1)) (-.f64 #s(literal 0 binary64) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) lambda1)) (-.f64 #s(literal 0 binary64) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) 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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 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.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))))))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/ (- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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)))
(-.f64 #s(literal 0 binary64) (*.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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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)))
(-.f64 #s(literal 0 binary64) (*.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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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)))
(-.f64 #s(literal 0 binary64) (*.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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(- (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(+ (* -1 (pow lambda1 2)) (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(+ (* -1 (pow lambda1 2)) (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(+ (* -1 (pow lambda1 2)) (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2))
(-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(* -1 (pow lambda1 2))
(*.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda1))
(* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) 1))
(*.f64 (*.f64 lambda1 lambda1) (+.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))
(* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) 1))
(*.f64 (*.f64 lambda1 lambda1) (+.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))
(* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) 1))
(*.f64 (*.f64 lambda1 lambda1) (+.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))
(* -1 (pow lambda1 2))
(*.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda1))
(* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) 1))
(*.f64 (*.f64 lambda1 lambda1) (+.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))
(* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) 1))
(*.f64 (*.f64 lambda1 lambda1) (+.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))
(* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2)) 1))
(*.f64 (*.f64 lambda1 lambda1) (+.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)
(pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))
(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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (sin.f64 delta) (*.f64 phi1 (cos.f64 theta)))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))
(*.f64 phi1 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)))))
(* 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 (sin.f64 delta) (+.f64 (cos.f64 theta) (*.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -1/2 binary64) (cos.f64 theta)))) (*.f64 phi1 (*.f64 phi1 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (+.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (*.f64 #s(literal 1/8 binary64) (*.f64 phi1 phi1))))))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (+ (* 1/12 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/144 (* (cos theta) (sin delta))) (+ (* -1/240 (* (cos theta) (sin delta))) (+ (* -1/720 (* (cos theta) (sin delta))) (* -1/5040 (* (cos theta) (sin delta))))))))))))))))
(*.f64 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 (cos.f64 theta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))
(* delta (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 delta (sin.f64 phi1))))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* (cos phi1) (* (cos theta) (sin phi1)))))
(*.f64 delta (*.f64 (fma.f64 (*.f64 delta 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 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (+.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 delta delta) #s(literal 1/120 binary64))))))
(* 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 (cos.f64 phi1) (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (*.f64 delta delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (fma.f64 (*.f64 delta delta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.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))))))))
(*.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 #s(literal 1/24 binary64) (*.f64 theta theta)))))
(+ (* (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 (cos.f64 phi1) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.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) (sin phi1))))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))
(* 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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 theta (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64))))
(* 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 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 theta theta) #s(literal 1/120 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 (cos.f64 phi1) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 theta theta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (fma.f64 (*.f64 theta theta) #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)))
(* 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 (*.f64 delta 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 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (+.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 delta delta) #s(literal 1/120 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 (cos.f64 phi1) (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 theta)) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 delta (*.f64 delta (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)))))))
(*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)))))
(+ (* (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)))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (sin.f64 delta) (*.f64 phi1 (cos.f64 theta)))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* (cos theta) (sin delta))))
(*.f64 phi1 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* 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 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (+.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))))))
(* 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 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(+ (* -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 delta) (sin.f64 phi1)))
(+ (* (sin delta) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (sin phi1))) (* 1/24 (* (pow theta 2) (* (sin delta) (sin phi1)))))))
(*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (*.f64 theta theta) (*.f64 #s(literal 1/24 binary64) (*.f64 theta theta)))))
(+ (* (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 (sin.f64 phi1) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (sin.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 theta) (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* 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 (*.f64 delta delta) #s(literal -1/6 binary64) #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 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (+.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 delta delta) #s(literal 1/120 binary64))))))
(* 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 (sin.f64 phi1) (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (cos.f64 theta)) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (*.f64 delta delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (fma.f64 (*.f64 delta delta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(asin (* (cos theta) (sin delta)))
(asin.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(sin delta)
(sin.f64 delta)
(+ (sin delta) (* -1/2 (* (pow theta 2) (sin delta))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta))
(+ (sin delta) (* (pow theta 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow theta 2) (sin delta))))))
(*.f64 (sin.f64 delta) (+.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (*.f64 theta theta) (*.f64 #s(literal 1/24 binary64) (*.f64 theta theta)))))
(+ (sin delta) (* (pow theta 2) (+ (* -1/2 (sin delta)) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (sin delta))) (* 1/24 (sin delta)))))))
(fma.f64 (fma.f64 #s(literal -1/2 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/720 binary64) (*.f64 theta theta) #s(literal 1/24 binary64)))))
(* (cos theta) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(* (cos theta) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(* (cos theta) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(* (cos theta) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(* (cos theta) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(* (cos theta) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(* (cos theta) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(* (cos theta) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(* delta (cos theta))
(*.f64 delta (cos.f64 theta))
(* delta (+ (cos theta) (* -1/6 (* (pow delta 2) (cos theta)))))
(*.f64 delta (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (cos.f64 theta)))
(* delta (+ (cos theta) (* (pow delta 2) (+ (* -1/6 (cos theta)) (* 1/120 (* (pow delta 2) (cos theta)))))))
(*.f64 delta (*.f64 (cos.f64 theta) (+.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 delta delta) #s(literal 1/120 binary64))))))
(* delta (+ (cos theta) (* (pow delta 2) (+ (* -1/6 (cos theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos theta))) (* 1/120 (cos theta))))))))
(*.f64 delta (fma.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (cos.f64 theta) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 delta (*.f64 delta (cos.f64 theta))) (fma.f64 (*.f64 delta delta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))))
(* (cos theta) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(* (cos theta) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(* (cos theta) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(* (cos theta) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(* (cos theta) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(* (cos theta) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(* (cos theta) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(* (cos theta) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 phi1 (cos.f64 theta))))
(+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 phi1 (-.f64 #s(literal 0 binary64) phi1) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (cos.f64 theta)))))
(+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (* -1 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))))))
(fma.f64 phi1 (fma.f64 phi1 (-.f64 #s(literal 0 binary64) (cos.f64 delta)) (neg.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)))))) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))
(+ 1 (* -1 (pow (sin phi1) 2)))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(+ 1 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* -1 (pow (sin phi1) 2))))
(-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/2 (pow (sin phi1) 2)) 1/2))))))
(+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))) (*.f64 delta (*.f64 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) (* (cos theta) (sin phi1)))) (* delta (- (+ (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (pow (sin phi1) 2))) 1/2))))))
(+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))) (*.f64 (*.f64 delta delta) (fma.f64 (sin.f64 phi1) (fma.f64 (*.f64 delta #s(literal 1/6 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1))) #s(literal -1/2 binary64))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(fma.f64 (sin.f64 phi1) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 theta theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (fma.f64 (*.f64 theta theta) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (*.f64 theta theta) #s(literal -1/24 binary64) #s(literal 1/2 binary64))) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
(+.f64 (cos.f64 delta) (fma.f64 (sin.f64 phi1) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 theta theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (*.f64 (*.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64))) (*.f64 (*.f64 theta theta) (*.f64 theta theta)))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (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 (*.f64 delta 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 (*.f64 (sin.f64 theta) (+.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 delta delta) #s(literal 1/120 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 (fma.f64 (*.f64 delta 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 (sin.f64 delta) (*.f64 theta (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(*.f64 theta (*.f64 (sin.f64 delta) (+.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 theta theta) #s(literal 1/120 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 (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))

eval352.0ms (1.9%)

Memory
-13.0MiB live, 512.6MiB allocated
Compiler

Compiled 96 057 to 3 703 computations (96.1% saved)

prune271.0ms (1.5%)

Memory
29.5MiB live, 343.5MiB allocated
Pruning

38 alts after pruning (38 fresh and 0 done)

PrunedKeptTotal
New1 871321 903
Fresh10616
Picked505
Done000
Total1 886381 924
Accuracy
99.9%
Counts
1 924 → 38
Alt Table
Click to see full alt table
StatusAccuracyProgram
54.1%
(fma.f64 (sqrt.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) (sqrt.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) lambda1)
99.8%
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
99.8%
(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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) lambda1) lambda1)
29.0%
(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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))))))
20.2%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
20.5%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
39.8%
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1)))
99.7%
(/.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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))
90.0%
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) lambda1)
81.0%
(+.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)))
78.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 phi1 (-.f64 #s(literal 0 binary64) phi1) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (cos.f64 theta)))))))
85.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 delta (cos.f64 phi1)) (sin.f64 phi1)) #s(literal 1 binary64))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (-.f64 #s(literal 0 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 #s(literal 0 binary64) (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))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)))))
84.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 (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)))))))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
85.3%
(+.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 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (/.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))))
99.7%
(+.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 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))))
95.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))
95.6%
(+.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))))))
94.1%
(+.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)))))
89.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta))) (sin.f64 phi1)) #s(literal 2 binary64)))))
90.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))))
95.6%
(+.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)))))))
89.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
65.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1))))) (cos.f64 delta)))
76.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 phi1)) (cos.f64 delta)))
90.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta)) (cos.f64 delta)))
78.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 phi1)) (cos.f64 delta)))
89.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))))))
88.3%
(+.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))))))))
88.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
78.5%
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)))
45.6%
(*.f64 (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)) (*.f64 lambda1 (*.f64 lambda1 lambda1)))) (fma.f64 lambda1 (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))))
48.1%
(*.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)))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) lambda1)))
55.7%
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)))))
Compiler

Compiled 3 476 to 1 694 computations (51.3% saved)

simplify415.0ms (2.3%)

Memory
-29.0MiB live, 420.5MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))
cost-diff0
(+.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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))
cost-diff0
(/.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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
cost-diff1408
(/.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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))
cost-diff0
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))))
cost-diff128
(*.f64 #s(literal 2 binary64) phi1)
cost-diff0
(*.f64 (sin.f64 theta) (sin.f64 delta))
cost-diff0
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
cost-diff384
(fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))
cost-diff53824
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
Rules
10 854×lower-fma.f32
10 842×lower-fma.f64
5 744×lower-*.f32
5 720×lower-*.f64
1 960×lower-+.f32
Iterations

Useful iterations: 4 (0.0ms)

IterNodesCost
057816
0109809
1184773
2386773
31668773
45611701
08125701
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 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.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 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.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) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)))
(pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))
(*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))
(fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))
#s(literal -1 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)
#s(literal 1 binary64)
(cos.f64 delta)
#s(literal 2 binary64)
(pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(cos.f64 theta)
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(sin.f64 phi1)
(fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(+.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 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(cos.f64 delta)
(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)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))))
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 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (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))
#s(literal 1/2 binary64)
(cos.f64 (*.f64 #s(literal 2 binary64) phi1))
(*.f64 #s(literal 2 binary64) phi1)
#s(literal 2 binary64)
(*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))
#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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(cos.f64 phi1)
phi1
(*.f64 (sin.f64 delta) (sin.f64 theta))
(sin.f64 delta)
delta
(sin.f64 theta)
theta
(fma.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 phi1)) (cos.f64 delta))
(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)
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(cos.f64 theta)
(-.f64 #s(literal 0 binary64) (sin.f64 phi1))
#s(literal 0 binary64)
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (fma.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 phi1) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 theta) (fma.f64 (sin.f64 delta) (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 0 binary64))) #s(literal 0 binary64))) #s(literal 1 binary64))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (fma.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 phi1) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 theta) (fma.f64 (sin.f64 delta) (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 0 binary64))) #s(literal 0 binary64))) #s(literal 1 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 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(*.f64 (fma.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 phi1) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 theta) (fma.f64 (sin.f64 delta) (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 0 binary64))) #s(literal 0 binary64))) #s(literal 1 binary64))
(-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)))
(-.f64 (pow.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(literal 0 binary64)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 theta) (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 0 binary64)) #s(literal 0 binary64)) #s(literal 2 binary64)))
(pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))
(pow.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(literal 0 binary64)) #s(literal 2 binary64))
(*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(literal 0 binary64))
(fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
#s(literal -1 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)
#s(literal 1 binary64)
(cos.f64 delta)
#s(literal 2 binary64)
(pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))
(pow.f64 (fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 theta) (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 0 binary64)) #s(literal 0 binary64)) #s(literal 2 binary64))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 theta) (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 0 binary64)) #s(literal 0 binary64))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(fma.f64 (cos.f64 theta) (fma.f64 (sin.f64 delta) (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 0 binary64))
(cos.f64 theta)
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(fma.f64 (sin.f64 delta) (sin.f64 phi1) #s(literal 0 binary64))
(sin.f64 phi1)
(fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 theta) (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 0 binary64)) #s(literal 0 binary64)))
(+.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 (cos.f64 delta) (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 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (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 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(cos.f64 delta)
(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)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) (-.f64 #s(literal -1/2 binary64) (fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 theta) (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 0 binary64)) #s(literal -1 binary64))))))
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 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) (-.f64 #s(literal -1/2 binary64) (fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 theta) (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 0 binary64)) #s(literal -1 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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) (-.f64 #s(literal -1/2 binary64) (fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 theta) (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 0 binary64)) #s(literal -1 binary64))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(cos.f64 (*.f64 #s(literal 2 binary64) phi1))
(cos.f64 (+.f64 phi1 phi1))
(*.f64 #s(literal 2 binary64) phi1)
(+.f64 phi1 phi1)
#s(literal 2 binary64)
(*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))
(fma.f64 (sin.f64 delta) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 theta) (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 0 binary64)) #s(literal 0 binary64))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) #s(literal 0 binary64))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) #s(literal 0 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))
#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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) #s(literal 0 binary64))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) #s(literal 0 binary64))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) #s(literal 0 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(cos.f64 phi1)
phi1
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 delta)
delta
(sin.f64 theta)
theta
(fma.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 phi1)) (cos.f64 delta))
(fma.f64 (fma.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) #s(literal 0 binary64))) (-.f64 #s(literal 0 binary64) (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))))
(fma.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) #s(literal 0 binary64)))
(sin.f64 phi1)
(cos.f64 delta)
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) #s(literal 0 binary64))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(cos.f64 theta)
(-.f64 #s(literal 0 binary64) (sin.f64 phi1))
#s(literal 0 binary64)

localize626.0ms (3.4%)

Memory
30.0MiB live, 657.8MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy99.7%
(*.f64 (sin.f64 delta) (cos.f64 theta))
accuracy99.7%
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
accuracy99.7%
(*.f64 (sin.f64 delta) (sin.f64 theta))
accuracy99.1%
(fma.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 phi1)) (cos.f64 delta))
accuracy99.7%
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
accuracy99.7%
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy99.7%
(*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))
accuracy99.4%
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))
accuracy99.8%
(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))))
accuracy99.7%
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy99.6%
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
accuracy99.4%
(-.f64 (cos.f64 delta) (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.5%
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
accuracy99.4%
(pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))
accuracy99.3%
(fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))
accuracy75.0%
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
Samples
262.0ms76×2valid
93.0ms128×0valid
63.0ms45×1valid
13.0ms3valid
Compiler

Compiled 818 to 65 computations (92.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 231.0ms
ival-cos: 54.0ms (23.4% of total)
ival-mult: 49.0ms (21.2% of total)
adjust: 35.0ms (15.1% of total)
ival-sin: 31.0ms (13.4% of total)
ival-add: 22.0ms (9.5% of total)
ival-atan2: 15.0ms (6.5% of total)
ival-pow2: 11.0ms (4.8% of total)
ival-div: 7.0ms (3% of total)
ival-sub: 7.0ms (3% of total)
exact: 1.0ms (0.4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series155.0ms (0.8%)

Memory
-10.4MiB live, 140.9MiB allocated
Counts
29 → 876
Calls
Call 1
Inputs
#<alt (/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))>
#<alt (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))>
#<alt (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))>
#<alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))>
#<alt (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))>
#<alt (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))>
#<alt (*.f64 (sin.f64 delta) (sin.f64 theta))>
#<alt (sin.f64 delta)>
#<alt (+.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)))))>
#<alt (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))))>
#<alt (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))>
#<alt (*.f64 (sin.f64 theta) (sin.f64 delta))>
#<alt (*.f64 #s(literal 2 binary64) phi1)>
#<alt (+.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 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))))>
#<alt (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))))>
#<alt (/.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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))>
#<alt (/.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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))>
#<alt (+.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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))>
#<alt (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))>
#<alt (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))>
#<alt (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))>
#<alt (cos.f64 delta)>
#<alt (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))>
#<alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))>
#<alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))>
#<alt (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))>
#<alt (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))>
#<alt (fma.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 phi1)) (cos.f64 delta))>
#<alt (*.f64 (sin.f64 delta) (cos.f64 theta))>
Outputs
#<alt (cos delta)>
#<alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))>
#<alt (+ (cos delta) (* phi1 (- (* phi1 (- (* -2 (cos delta)) (+ (* -1 (cos delta)) (+ (* -1 (/ (* (pow (cos theta) 2) (pow (sin delta) 2)) (cos delta))) (/ (* (pow (cos theta) 2) (pow (sin delta) 2)) (cos delta)))))) (* (cos theta) (sin delta)))))>
#<alt (+ (cos delta) (* phi1 (- (* phi1 (- (+ (* -2 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (+ (* (cos theta) (sin delta)) (/ (* (cos theta) (* (sin delta) (- (* -2 (cos delta)) (+ (* -1 (cos delta)) (+ (* -1 (/ (* (pow (cos theta) 2) (pow (sin delta) 2)) (cos delta))) (/ (* (pow (cos theta) 2) (pow (sin delta) 2)) (cos delta))))))) (cos delta)))))))) (+ (* -1 (cos delta)) (+ (* -1 (/ (* (pow (cos theta) 2) (pow (sin delta) 2)) (cos delta))) (/ (* (pow (cos theta) 2) (pow (sin delta) 2)) (cos delta)))))) (* (cos theta) (sin delta)))))>
#<alt (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))>
#<alt (+ 1 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))))>
#<alt (+ 1 (+ (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* delta (- (* delta (- (* -1 (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))))) (+ (* -1/2 (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))))>
#<alt (+ 1 (+ (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* delta (- (* delta (- (+ (* -1 (* delta (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (+ (* 1/2 (* (cos phi1) (* (cos theta) (sin phi1)))) (/ (* (cos phi1) (* (cos theta) (* (sin phi1) (- (* -1 (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))))) (+ (* -1/2 (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))))))))) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))))))) (* -1 (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))))) (+ (* -1/2 (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))))>
#<alt (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))>
#<alt (- (+ (* (pow theta 2) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2))))) (/ (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))))>
#<alt (- (+ (* (pow theta 2) (- (+ (* (pow theta 2) (- (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2))))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* 1/24 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2)))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2))))) (/ (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))))>
#<alt (- (+ (* (pow theta 2) (- (+ (* (pow theta 2) (- (+ (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (pow theta 2) (- (* 2/45 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2))))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* 1/24 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2)))))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* -1/720 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2))) (* 1/24 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2))))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))))))))) (+ (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2))))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* 1/24 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2)))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2))))) (/ (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))))>
#<alt (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt 1>
#<alt (+ 1 (* -1 (pow phi1 2)))>
#<alt (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))>
#<alt (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))>
#<alt (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))>
#<alt (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))>
#<alt (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))>
#<alt (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))>
#<alt (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))>
#<alt (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))>
#<alt (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))>
#<alt (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt lambda1>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))>
#<alt lambda1>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (sin delta) (sin theta)) (cos delta))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))>
#<alt lambda1>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (sin delta) (sin theta)) (cos delta)) lambda1)))>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (sin delta) (sin theta)) (cos delta)) lambda1)))>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (sin delta) (sin theta)) (cos delta)) lambda1)))>
#<alt lambda1>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (sin theta)) (cos delta)) lambda1)) 1)))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (sin theta)) (cos delta)) lambda1)) 1)))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (sin theta)) (cos delta)) lambda1)) 1)))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (cos delta)))>
#<alt (atan2 (* (sin delta) (sin theta)) (cos delta))>
#<alt (atan2 (* (sin delta) (sin theta)) (cos delta))>
#<alt (atan2 (* (sin delta) (sin theta)) (cos delta))>
#<alt (atan2 (* (sin delta) (sin theta)) (cos delta))>
#<alt (atan2 (* (sin delta) (sin theta)) (cos delta))>
#<alt (atan2 (* (sin delta) (sin theta)) (cos delta))>
#<alt (atan2 (* (sin delta) (sin theta)) (cos delta))>
#<alt (atan2 (* (sin delta) (sin theta)) (cos delta))>
#<alt (atan2 (* (sin delta) (sin theta)) (cos delta))>
#<alt (atan2 (* (sin delta) (sin theta)) (cos delta))>
#<alt (atan2 (* (sin delta) (sin theta)) (cos delta))>
#<alt (atan2 (* (sin delta) (sin theta)) (cos delta))>
#<alt (atan2 (* (sin delta) (sin theta)) (cos delta))>
#<alt (atan2 (* (sin delta) (sin theta)) (cos delta))>
#<alt (atan2 (* (sin delta) (sin theta)) (cos delta))>
#<alt (atan2 (* (sin delta) (sin theta)) (cos delta))>
#<alt (atan2 (* (sin delta) (sin theta)) (cos delta))>
#<alt (atan2 (* (sin delta) (sin theta)) (cos delta))>
#<alt (atan2 (* (sin delta) (sin theta)) (cos delta))>
#<alt (atan2 (* (sin delta) (sin theta)) (cos delta))>
#<alt (atan2 (* (sin delta) (sin theta)) (cos delta))>
#<alt (atan2 (* (sin delta) (sin theta)) (cos delta))>
#<alt (atan2 (* (sin delta) (sin theta)) (cos delta))>
#<alt (atan2 (* (sin delta) (sin theta)) (cos delta))>
#<alt (* delta (sin theta))>
#<alt (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))>
#<alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))>
#<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))))))))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* theta (sin delta))>
#<alt (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))>
#<alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))>
#<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))))))))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt delta>
#<alt (* delta (+ 1 (* -1/6 (pow delta 2))))>
#<alt (* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6))))>
#<alt (* delta (+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/120 (* -1/5040 (pow delta 2)))) 1/6))))>
#<alt (sin delta)>
#<alt (sin delta)>
#<alt (sin delta)>
#<alt (sin delta)>
#<alt (sin delta)>
#<alt (sin delta)>
#<alt (sin delta)>
#<alt (sin delta)>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt lambda1>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))) lambda1)))>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))) lambda1)))>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))) lambda1)))>
#<alt lambda1>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))) lambda1)) 1)))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))) lambda1)) 1)))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))) lambda1)) 1)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))>
#<alt (* theta (* (cos phi1) (sin delta)))>
#<alt (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))>
#<alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))>
#<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)))))))))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* delta (* (cos phi1) (sin theta)))>
#<alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))>
#<alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))>
#<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)))))))))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (sin delta) (sin theta))>
#<alt (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))>
#<alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))>
#<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))))))))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (* theta (sin delta))>
#<alt (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))>
#<alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))>
#<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))))))))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* delta (sin theta))>
#<alt (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))>
#<alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))>
#<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))))))))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* (sin delta) (sin theta))>
#<alt (* 2 phi1)>
#<alt (* 2 phi1)>
#<alt (* 2 phi1)>
#<alt (* 2 phi1)>
#<alt (* 2 phi1)>
#<alt (* 2 phi1)>
#<alt (* 2 phi1)>
#<alt (* 2 phi1)>
#<alt (* 2 phi1)>
#<alt (* 2 phi1)>
#<alt (* 2 phi1)>
#<alt (* 2 phi1)>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt lambda1>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) lambda1)))>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) lambda1)))>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) lambda1)))>
#<alt lambda1>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) lambda1)) 1)))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) lambda1)) 1)))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) lambda1)) 1)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt lambda1>
#<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)))>
#<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)))>
#<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)))>
#<alt lambda1>
#<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)))>
#<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)))>
#<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)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (/ 1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ (* -1 (/ lambda1 (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2))) (/ 1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (+ (* lambda1 (- (/ lambda1 (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 3)) (/ 1 (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)))) (/ 1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (+ (* lambda1 (- (* lambda1 (+ (* -1 (/ lambda1 (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 4))) (/ 1 (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 3)))) (/ 1 (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)))) (/ 1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 lambda1)>
#<alt (/ (+ 1 (* -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)>
#<alt (/ (- (+ 1 (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) lambda1)>
#<alt (/ (- (+ 1 (* -1 (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 3) (pow lambda1 3)))) (+ (* -1 (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))) lambda1)>
#<alt (/ 1 lambda1)>
#<alt (* -1 (/ (- (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1) 1) lambda1))>
#<alt (* -1 (/ (- (* -1 (/ (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) lambda1) (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) lambda1)) 1) lambda1))>
#<alt (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 3) lambda1) (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)) lambda1)) (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) lambda1)) 1) lambda1))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt lambda1>
#<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)))>
#<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)))>
#<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)))>
#<alt lambda1>
#<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)))>
#<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)))>
#<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)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))>
#<alt (pow phi1 2)>
#<alt (* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))>
#<alt (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))>
#<alt (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))>
#<alt (+ 1/2 (* -1/2 (cos (* 2 phi1))))>
#<alt (+ 1/2 (* -1/2 (cos (* 2 phi1))))>
#<alt (+ 1/2 (* -1/2 (cos (* 2 phi1))))>
#<alt (+ 1/2 (* -1/2 (cos (* 2 phi1))))>
#<alt (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))>
#<alt (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))>
#<alt (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))>
#<alt (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))>
#<alt (pow (cos delta) 2)>
#<alt (+ (* -2 (* (pow phi1 2) (pow (cos delta) 2))) (pow (cos delta) 2))>
#<alt (+ (* (pow phi1 2) (+ (* -2 (pow (cos delta) 2)) (* 5/3 (* (pow phi1 2) (pow (cos delta) 2))))) (pow (cos delta) 2))>
#<alt (+ (* (pow phi1 2) (+ (* -2 (pow (cos delta) 2)) (* (pow phi1 2) (+ (* -34/45 (* (pow phi1 2) (pow (cos delta) 2))) (* 5/3 (pow (cos delta) 2)))))) (pow (cos delta) 2))>
#<alt (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))>
#<alt (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))>
#<alt (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))>
#<alt (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))>
#<alt (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2))>
#<alt (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2))>
#<alt (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2))>
#<alt (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2))>
#<alt (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)>
#<alt (+ (* -1 (* (pow delta 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))>
#<alt (+ (* (pow delta 2) (+ (* -1 (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* 1/3 (* (pow delta 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))))) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))>
#<alt (+ (* (pow delta 2) (+ (* -1 (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow delta 2) (+ (* -2/45 (* (pow delta 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))) (* 1/3 (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)))))) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))>
#<alt (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))>
#<alt (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))>
#<alt (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))>
#<alt (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))>
#<alt (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))>
#<alt (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))>
#<alt (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))>
#<alt (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))>
#<alt 1>
#<alt (+ 1 (* -1/2 (pow delta 2)))>
#<alt (+ 1 (* (pow delta 2) (- (* 1/24 (pow delta 2)) 1/2)))>
#<alt (+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/24 (* -1/720 (pow delta 2)))) 1/2)))>
#<alt (cos delta)>
#<alt (cos delta)>
#<alt (cos delta)>
#<alt (cos delta)>
#<alt (cos delta)>
#<alt (cos delta)>
#<alt (cos delta)>
#<alt (cos delta)>
#<alt (- 1 (pow (sin phi1) 2))>
#<alt (- (+ 1 (* -1/2 (pow delta 2))) (pow (sin phi1) 2))>
#<alt (- (+ 1 (* (pow delta 2) (- (* 1/24 (pow delta 2)) 1/2))) (pow (sin phi1) 2))>
#<alt (- (+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/24 (* -1/720 (pow delta 2)))) 1/2))) (pow (sin phi1) 2))>
#<alt (- (cos delta) (pow (sin phi1) 2))>
#<alt (- (cos delta) (pow (sin phi1) 2))>
#<alt (- (cos delta) (pow (sin phi1) 2))>
#<alt (- (cos delta) (pow (sin phi1) 2))>
#<alt (- (cos delta) (pow (sin phi1) 2))>
#<alt (- (cos delta) (pow (sin phi1) 2))>
#<alt (- (cos delta) (pow (sin phi1) 2))>
#<alt (- (cos delta) (pow (sin phi1) 2))>
#<alt (cos delta)>
#<alt (+ (cos delta) (* -1 (pow phi1 2)))>
#<alt (+ (cos delta) (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))>
#<alt (+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))>
#<alt (- (cos delta) (pow (sin phi1) 2))>
#<alt (- (cos delta) (pow (sin phi1) 2))>
#<alt (- (cos delta) (pow (sin phi1) 2))>
#<alt (- (cos delta) (pow (sin phi1) 2))>
#<alt (- (cos delta) (pow (sin phi1) 2))>
#<alt (- (cos delta) (pow (sin phi1) 2))>
#<alt (- (cos delta) (pow (sin phi1) 2))>
#<alt (- (cos delta) (pow (sin phi1) 2))>
#<alt (pow phi1 2)>
#<alt (* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))>
#<alt (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))>
#<alt (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))>
#<alt (pow (sin phi1) 2)>
#<alt (pow (sin phi1) 2)>
#<alt (pow (sin phi1) 2)>
#<alt (pow (sin phi1) 2)>
#<alt (pow (sin phi1) 2)>
#<alt (pow (sin phi1) 2)>
#<alt (pow (sin phi1) 2)>
#<alt (pow (sin phi1) 2)>
#<alt 1>
#<alt (+ 1 (* -1 (pow phi1 2)))>
#<alt (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))>
#<alt (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))>
#<alt (+ 1/2 (* 1/2 (cos (* 2 phi1))))>
#<alt (+ 1/2 (* 1/2 (cos (* 2 phi1))))>
#<alt (+ 1/2 (* 1/2 (cos (* 2 phi1))))>
#<alt (+ 1/2 (* 1/2 (cos (* 2 phi1))))>
#<alt (+ 1/2 (* 1/2 (cos (* 2 phi1))))>
#<alt (+ 1/2 (* 1/2 (cos (* 2 phi1))))>
#<alt (+ 1/2 (* 1/2 (cos (* 2 phi1))))>
#<alt (+ 1/2 (* 1/2 (cos (* 2 phi1))))>
#<alt (* phi1 (* (cos theta) (sin delta)))>
#<alt (* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))>
#<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)))))))))))>
#<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))))))))))))))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* delta (* (cos phi1) (* (cos theta) (sin phi1))))>
#<alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* (cos phi1) (* (cos theta) (sin phi1)))))>
#<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)))))))))>
#<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))))))))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (sin delta) (sin phi1)))>
#<alt (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))>
#<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))))))))>
#<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)))))))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))>
#<alt (* (cos theta) (sin delta))>
#<alt (+ (* -1/2 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* (cos theta) (sin delta)))>
#<alt (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* 1/24 (* (pow phi1 2) (* (cos theta) (sin delta)))))))>
#<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))))))))>
#<alt (* (cos phi1) (* (cos theta) (sin delta)))>
#<alt (* (cos phi1) (* (cos theta) (sin delta)))>
#<alt (* (cos phi1) (* (cos theta) (sin delta)))>
#<alt (* (cos phi1) (* (cos theta) (sin delta)))>
#<alt (* (cos phi1) (* (cos theta) (sin delta)))>
#<alt (* (cos phi1) (* (cos theta) (sin delta)))>
#<alt (* (cos phi1) (* (cos theta) (sin delta)))>
#<alt (* (cos phi1) (* (cos theta) (sin delta)))>
#<alt (* delta (* (cos phi1) (cos theta)))>
#<alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* (cos phi1) (cos theta))))>
#<alt (* delta (+ (* (cos phi1) (cos theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (cos theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (cos theta))))))))>
#<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)))))))))>
#<alt (* (cos phi1) (* (cos theta) (sin delta)))>
#<alt (* (cos phi1) (* (cos theta) (sin delta)))>
#<alt (* (cos phi1) (* (cos theta) (sin delta)))>
#<alt (* (cos phi1) (* (cos theta) (sin delta)))>
#<alt (* (cos phi1) (* (cos theta) (sin delta)))>
#<alt (* (cos phi1) (* (cos theta) (sin delta)))>
#<alt (* (cos phi1) (* (cos theta) (sin delta)))>
#<alt (* (cos phi1) (* (cos theta) (sin delta)))>
#<alt (* (cos phi1) (sin delta))>
#<alt (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))>
#<alt (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta)))))))>
#<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))))))))>
#<alt (* (cos phi1) (* (cos theta) (sin delta)))>
#<alt (* (cos phi1) (* (cos theta) (sin delta)))>
#<alt (* (cos phi1) (* (cos theta) (sin delta)))>
#<alt (* (cos phi1) (* (cos theta) (sin delta)))>
#<alt (* (cos phi1) (* (cos theta) (sin delta)))>
#<alt (* (cos phi1) (* (cos theta) (sin delta)))>
#<alt (* (cos phi1) (* (cos theta) (sin delta)))>
#<alt (* (cos phi1) (* (cos theta) (sin delta)))>
#<alt (cos delta)>
#<alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))>
#<alt (+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))>
#<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)))))))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ 1 (* -1 (pow (sin phi1) 2)))>
#<alt (+ 1 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* -1 (pow (sin phi1) 2))))>
#<alt (+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/2 (pow (sin phi1) 2)) 1/2))))))>
#<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))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))>
#<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)))))))>
#<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))))))))>
#<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)))))))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (* delta (cos theta))>
#<alt (* delta (+ (cos theta) (* -1/6 (* (pow delta 2) (cos theta)))))>
#<alt (* delta (+ (cos theta) (* (pow delta 2) (+ (* -1/6 (cos theta)) (* 1/120 (* (pow delta 2) (cos theta)))))))>
#<alt (* delta (+ (cos theta) (* (pow delta 2) (+ (* -1/6 (cos theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos theta))) (* 1/120 (cos theta))))))))>
#<alt (* (cos theta) (sin delta))>
#<alt (* (cos theta) (sin delta))>
#<alt (* (cos theta) (sin delta))>
#<alt (* (cos theta) (sin delta))>
#<alt (* (cos theta) (sin delta))>
#<alt (* (cos theta) (sin delta))>
#<alt (* (cos theta) (sin delta))>
#<alt (* (cos theta) (sin delta))>
#<alt (sin delta)>
#<alt (+ (sin delta) (* -1/2 (* (pow theta 2) (sin delta))))>
#<alt (+ (sin delta) (* (pow theta 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow theta 2) (sin delta))))))>
#<alt (+ (sin delta) (* (pow theta 2) (+ (* -1/2 (sin delta)) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (sin delta))) (* 1/24 (sin delta)))))))>
#<alt (* (cos theta) (sin delta))>
#<alt (* (cos theta) (sin delta))>
#<alt (* (cos theta) (sin delta))>
#<alt (* (cos theta) (sin delta))>
#<alt (* (cos theta) (sin delta))>
#<alt (* (cos theta) (sin delta))>
#<alt (* (cos theta) (sin delta))>
#<alt (* (cos theta) (sin delta))>
Calls

219 calls:

TimeVariablePointExpression
27.0ms
theta
@0
(+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (pow (sin phi1) 2))))
20.0ms
delta
@0
(/ (- (pow (* (+ (* -1 (+ (* (cos (+ phi1 phi1)) -1/2) 1/2)) 1) (cos delta)) 2) (pow (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) 2)) (+ (* (+ (* -1 (+ (* (cos (+ phi1 phi1)) -1/2) 1/2)) 1) (cos delta)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
15.0ms
lambda1
@inf
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (- 0 (sin phi1))) (cos delta)))))
4.0ms
phi1
@inf
(/ (- (pow (* (+ (* -1 (+ (* (cos (+ phi1 phi1)) -1/2) 1/2)) 1) (cos delta)) 2) (pow (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) 2)) (+ (* (+ (* -1 (+ (* (cos (+ phi1 phi1)) -1/2) 1/2)) 1) (cos delta)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
4.0ms
delta
@inf
(/ (- (pow (* (+ (* -1 (+ (* (cos (+ phi1 phi1)) -1/2) 1/2)) 1) (cos delta)) 2) (pow (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) 2)) (+ (* (+ (* -1 (+ (* (cos (+ phi1 phi1)) -1/2) 1/2)) 1) (cos delta)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))

rewrite549.0ms (3%)

Memory
20.0MiB live, 811.7MiB allocated
Algorithm
batch-egg-rewrite
Rules
4 994×lower-*.f32
4 970×lower-*.f64
4 522×lower-fma.f32
4 510×lower-fma.f64
2 376×lower-/.f32
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
057539
0109533
1436404
23226404
08680404
Stop Event
iter limit
node limit
iter limit
Counts
29 → 581
Calls
Call 1
Inputs
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 #s(literal 2 binary64) phi1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)) (*.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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))
(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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (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 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))
(cos.f64 delta)
(-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))
(*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(fma.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 phi1)) (cos.f64 delta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
Outputs
(+.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) (neg.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))) #s(literal -1 binary64)))
(-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) (/.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) (neg.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))))
(fma.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) (neg.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (exp.f64 (log.f64 (cos.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))
(fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) (neg.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))))
(fma.f64 (sqrt.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (sqrt.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))) (neg.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (neg.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))))
(fma.f64 (pow.f64 (sqrt.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))
(fma.f64 (exp.f64 (log.f64 (cos.f64 delta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))
(neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 6 binary64))) (*.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))) (+.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 delta) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 4 binary64))) (*.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) (*.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)))) (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))) #s(literal 2 binary64)))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 delta) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #s(literal 2 binary64))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64))))) (neg.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(/.f64 (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))) #s(literal 3 binary64))) (/.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 6 binary64)) (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))) #s(literal 3 binary64)))) (+.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) (/.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) (/.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64))) #s(literal 1 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))) (+.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 delta) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64))))
(/.f64 (-.f64 (neg.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))))) (*.f64 (+.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 delta) (+.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 (+.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))))) (*.f64 (+.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))) (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))) (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))) (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))) (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))) (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64))))) (*.f64 (/.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))) (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (/.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)))) (*.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))) #s(literal 1 binary64))) (*.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))) (/.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))) (*.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64))))) (*.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))))
(/.f64 (-.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) (/.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) (*.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))))
(/.f64 (-.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))) (*.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))
(*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))))
(*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)))) #s(literal -1 binary64)))
(*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))
(*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(*.f64 (pow.f64 (/.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 6 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 delta) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #s(literal 2 binary64)))))
(*.f64 (pow.f64 (/.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 4 binary64)))) #s(literal -1 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)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal -1/2 binary64))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (cos.f64 phi1))))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(-.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))))
(-.f64 (/.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal -1 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1 binary64) #s(literal 1/2 binary64))
(fma.f64 (*.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (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 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #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 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (-.f64 (fma.f64 #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/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #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 (+.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)))
(/.f64 (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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(/.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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (-.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 #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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (-.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))))
(/.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (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 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #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))
(pow.f64 (exp.f64 (log.f64 (cos.f64 phi1))) #s(literal 2 binary64))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))))
(*.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (-.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 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))))
(*.f64 (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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.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)))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.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)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (exp.f64 (log.f64 (cos.f64 phi1))) (exp.f64 (log.f64 (cos.f64 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1)
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) 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))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) 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))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))))))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) #s(literal 2 binary64)))) #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))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) lambda1)
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) lambda1))) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) lambda1))))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) lambda1)))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) lambda1))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64)))) (*.f64 (-.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)))))
(pow.f64 (/.f64 (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) lambda1))) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.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 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) lambda1)))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.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 (/.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 delta theta)) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #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 delta theta)) (cos.f64 (+.f64 delta theta)))))
(/.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 delta theta)) (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 (neg.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 (-.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 (-.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))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) #s(literal -1 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 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))
(sin.f64 delta)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (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) (/.f64 (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) 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))) (-.f64 (cos.f64 delta) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta 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 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1)))
(*.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 delta)) (sin.f64 theta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(-.f64 (/.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 delta theta)) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #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 delta theta)) (cos.f64 (+.f64 delta theta)))))
(/.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 delta theta)) (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 (neg.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 (-.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 (-.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))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) #s(literal -1 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 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))
(+.f64 phi1 phi1)
(-.f64 (/.f64 (*.f64 phi1 phi1) #s(literal 0 binary64)) (/.f64 (*.f64 phi1 phi1) #s(literal 0 binary64)))
(/.f64 #s(literal 1 binary64) (+.f64 phi1 phi1))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 phi1 phi1 #s(literal 0 binary64)) (*.f64 (fma.f64 phi1 phi1 #s(literal 0 binary64)) (+.f64 phi1 phi1))))
(/.f64 #s(literal 0 binary64) #s(literal 0 binary64))
(/.f64 (*.f64 (fma.f64 phi1 phi1 #s(literal 0 binary64)) (+.f64 phi1 phi1)) (fma.f64 phi1 phi1 #s(literal 0 binary64)))
(/.f64 (neg.f64 (*.f64 (fma.f64 phi1 phi1 #s(literal 0 binary64)) (+.f64 phi1 phi1))) (neg.f64 (fma.f64 phi1 phi1 #s(literal 0 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 0 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 phi1 phi1))) #s(literal 0 binary64))
(pow.f64 (+.f64 phi1 phi1) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 phi1 phi1 #s(literal 0 binary64)) (*.f64 (fma.f64 phi1 phi1 #s(literal 0 binary64)) (+.f64 phi1 phi1))) #s(literal -1 binary64))
(*.f64 phi1 #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) phi1)
(*.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) #s(literal 0 binary64)))
(*.f64 (*.f64 (fma.f64 phi1 phi1 #s(literal 0 binary64)) (+.f64 phi1 phi1)) (/.f64 #s(literal 1 binary64) (fma.f64 phi1 phi1 #s(literal 0 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1)
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 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 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) 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 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(/.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 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) 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 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+.f64 (*.f64 #s(literal 1 binary64) lambda1) (*.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(+.f64 (*.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) (*.f64 #s(literal 1 binary64) lambda1))
(+.f64 (*.f64 lambda1 #s(literal 1 binary64)) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 1 binary64)))
(+.f64 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 1 binary64)) (*.f64 lambda1 #s(literal 1 binary64)))
(exp.f64 (log.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))
(exp.f64 (*.f64 (log.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))) #s(literal 1 binary64)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))
(fma.f64 #s(literal 1 binary64) lambda1 (*.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(fma.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) (*.f64 #s(literal 1 binary64) lambda1))
(fma.f64 lambda1 #s(literal 1 binary64) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 1 binary64)))
(fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 1 binary64) (*.f64 lambda1 #s(literal 1 binary64)))
(neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/.f64 (*.f64 #s(literal 1 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))
(pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal 1 binary64))
(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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (*.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))) #s(literal -1/2 binary64))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))
(*.f64 #s(literal -1 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))) #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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))
(*.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal 1/2 binary64)) (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal 1/2 binary64)))
(*.f64 (pow.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) #s(literal 1 binary64)) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)))) #s(literal -1 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))) #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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))
(exp.f64 (-.f64 #s(literal 0 binary64) (log.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))))
(exp.f64 (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))) #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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))) #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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))) #s(literal -1 binary64))
(pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal -1 binary64))
(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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))) #s(literal 1 binary64))
(pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))) #s(literal -1/2 binary64))
(*.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))
(*.f64 #s(literal -1 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))) #s(literal 1 binary64)))
(*.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))
(*.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))) #s(literal 1 binary64))
(*.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal -1/2 binary64)) (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))
(*.f64 (/.f64 #s(literal 1 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal 1/2 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)))) #s(literal 1 binary64)) (pow.f64 (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))) #s(literal 1 binary64)) (pow.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+.f64 (*.f64 #s(literal 1 binary64) lambda1) (*.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(+.f64 (*.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) (*.f64 #s(literal 1 binary64) lambda1))
(+.f64 (*.f64 lambda1 #s(literal 1 binary64)) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 1 binary64)))
(+.f64 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 1 binary64)) (*.f64 lambda1 #s(literal 1 binary64)))
(exp.f64 (log.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))
(exp.f64 (*.f64 (log.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))) #s(literal 1 binary64)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))
(fma.f64 #s(literal 1 binary64) lambda1 (*.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(fma.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) (*.f64 #s(literal 1 binary64) lambda1))
(fma.f64 lambda1 #s(literal 1 binary64) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 1 binary64)))
(fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 1 binary64) (*.f64 lambda1 #s(literal 1 binary64)))
(neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/.f64 (*.f64 #s(literal 1 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))
(pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal 1 binary64))
(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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (*.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))) #s(literal -1/2 binary64))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))
(*.f64 #s(literal -1 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))) #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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))
(*.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal 1/2 binary64)) (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal 1/2 binary64)))
(*.f64 (pow.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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) #s(literal 1 binary64)) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)))) #s(literal -1 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))) #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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #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 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(/.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 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #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/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 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 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #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 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (-.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 #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 #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 phi1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(/.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 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(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 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #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 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 #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 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))
(exp.f64 (fma.f64 (log.f64 (cos.f64 delta)) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (cos.f64 phi1))) #s(literal 2 binary64))))
(exp.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (log.f64 (cos.f64 phi1))) #s(literal 2 binary64) (*.f64 (log.f64 (cos.f64 delta)) #s(literal 2 binary64))))
(pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(*.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(*.f64 (cos.f64 delta) (pow.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(*.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 delta) (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 (cos.f64 delta) (*.f64 (cos.f64 delta) (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)) (pow.f64 (*.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))
(*.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))
(*.f64 (*.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (cos.f64 delta))
(*.f64 (*.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (cos.f64 delta)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (cos.f64 delta)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (cos.f64 delta)) #s(literal 1 binary64)))
(cos.f64 delta)
(pow.f64 (cos.f64 delta) #s(literal 1 binary64))
(+.f64 (cos.f64 delta) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(+.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (cos.f64 delta))
(-.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (+.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 (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 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (+.f64 (cos.f64 delta) (-.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 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (sin.f64 phi1) (cos.f64 delta))
(/.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 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 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 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (*.f64 (cos.f64 delta) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (cos.f64 delta) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 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 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (neg.f64 (-.f64 (+.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)))) (neg.f64 (+.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (+.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (+.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (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 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (+.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (+.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (*.f64 (+.f64 (cos.f64 delta) (-.f64 #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 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(pow.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (+.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) #s(literal -1 binary64))
(*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 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 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(*.f64 (-.f64 (+.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 #s(literal 1 binary64) (+.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 0 binary64))
(+.f64 #s(literal 0 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))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi1) #s(literal 0 binary64))
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 0 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)) #s(literal 0 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 0 binary64)))))
(/.f64 (+.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (+.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))
(/.f64 (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 0 binary64)) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 0 binary64)))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 #s(literal 0 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 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 (-.f64 #s(literal 0 binary64) (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 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal -1/2 binary64))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (cos.f64 phi1))))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(-.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))))
(-.f64 (/.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal -1 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1 binary64) #s(literal 1/2 binary64))
(fma.f64 (*.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (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 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #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 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (-.f64 (fma.f64 #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/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #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 (+.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)))
(/.f64 (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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(/.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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (-.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 #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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (-.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))))
(/.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (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 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #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))
(pow.f64 (exp.f64 (log.f64 (cos.f64 phi1))) #s(literal 2 binary64))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))))
(*.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (-.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 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))))
(*.f64 (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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.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)))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.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)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (exp.f64 (log.f64 (cos.f64 phi1))) (exp.f64 (log.f64 (cos.f64 phi1))))
(exp.f64 (log.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))
(/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 2 binary64))
(pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 1 binary64))
(pow.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))) #s(literal 2 binary64))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(*.f64 (sin.f64 phi1) (exp.f64 (log.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
(*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
(*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (cos.f64 phi1))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) (sin.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(*.f64 (sqrt.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))) (sqrt.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))
(*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (cos.f64 theta))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)) (sin.f64 delta))
(*.f64 (pow.f64 (cos.f64 theta) #s(literal 1 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 1 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64)) (pow.f64 (cos.f64 theta) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #s(literal 1 binary64)) (pow.f64 (cos.f64 theta) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 1 binary64)) (pow.f64 (sin.f64 delta) #s(literal 1 binary64)))
(*.f64 (exp.f64 (log.f64 (cos.f64 phi1))) (exp.f64 (log.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(*.f64 (exp.f64 (log.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (exp.f64 (log.f64 (cos.f64 phi1))))
(*.f64 (exp.f64 (log.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))) (sin.f64 phi1))
(*.f64 (exp.f64 (log.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (exp.f64 (log.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))) #s(literal 1 binary64)))
(/.f64 (*.f64 (cos.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))) (cos.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) #s(literal 1 binary64))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(*.f64 (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 1 binary64)))
(*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (pow.f64 (sin.f64 delta) #s(literal 1 binary64)))
(*.f64 (pow.f64 (cos.f64 theta) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 1 binary64)) (cos.f64 phi1))
(*.f64 (pow.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) #s(literal 1 binary64)) (pow.f64 (cos.f64 theta) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
(+.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))))
(+.f64 (*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (cos.f64 delta))
(-.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (neg.f64 (cos.f64 delta)))))
(fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (pow.f64 (*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (pow.f64 (*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) #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 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) #s(literal 2 binary64)) (*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (neg.f64 (cos.f64 delta))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) #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 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (pow.f64 (*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (neg.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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)))) (pow.f64 (*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (neg.f64 (cos.f64 delta)))) (*.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (neg.f64 (cos.f64 delta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (neg.f64 (cos.f64 delta)))))
(pow.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (pow.f64 (*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (pow.f64 (*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (neg.f64 (cos.f64 delta)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))
(/.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))) #s(literal -2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))) #s(literal -1 binary64))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(*.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))

simplify676.0ms (3.7%)

Memory
10.4MiB live, 999.2MiB allocated
Algorithm
egg-herbie
Rules
9 050×lower-fma.f64
9 050×lower-fma.f32
5 166×lower-*.f64
5 166×lower-*.f32
5 100×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
069424969
1230023703
2521823280
0835022313
Stop Event
iter limit
node limit
Counts
876 → 863
Calls
Call 1
Inputs
(cos delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -2 (cos delta)) (+ (* -1 (cos delta)) (+ (* -1 (/ (* (pow (cos theta) 2) (pow (sin delta) 2)) (cos delta))) (/ (* (pow (cos theta) 2) (pow (sin delta) 2)) (cos delta)))))) (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* phi1 (- (+ (* -2 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (+ (* (cos theta) (sin delta)) (/ (* (cos theta) (* (sin delta) (- (* -2 (cos delta)) (+ (* -1 (cos delta)) (+ (* -1 (/ (* (pow (cos theta) 2) (pow (sin delta) 2)) (cos delta))) (/ (* (pow (cos theta) 2) (pow (sin delta) 2)) (cos delta))))))) (cos delta)))))))) (+ (* -1 (cos delta)) (+ (* -1 (/ (* (pow (cos theta) 2) (pow (sin delta) 2)) (cos delta))) (/ (* (pow (cos theta) 2) (pow (sin delta) 2)) (cos delta)))))) (* (cos theta) (sin delta)))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))
(+ 1 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))))
(+ 1 (+ (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* delta (- (* delta (- (* -1 (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))))) (+ (* -1/2 (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))))
(+ 1 (+ (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* delta (- (* delta (- (+ (* -1 (* delta (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (+ (* 1/2 (* (cos phi1) (* (cos theta) (sin phi1)))) (/ (* (cos phi1) (* (cos theta) (* (sin phi1) (- (* -1 (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))))) (+ (* -1/2 (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))))))))) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))))))) (* -1 (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))))) (+ (* -1/2 (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (* (pow theta 2) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2))))) (/ (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(- (+ (* (pow theta 2) (- (+ (* (pow theta 2) (- (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2))))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* 1/24 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2)))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2))))) (/ (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(- (+ (* (pow theta 2) (- (+ (* (pow theta 2) (- (+ (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (pow theta 2) (- (* 2/45 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2))))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* 1/24 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2)))))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* -1/720 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2))) (* 1/24 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2))))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))))))))) (+ (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2))))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* 1/24 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2)))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2))))) (/ (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
1
(+ 1 (* -1 (pow phi1 2)))
(+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))
(+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))
(+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))
(+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))
(+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))
(+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))
(+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))
(+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(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))) (- (cos delta) (pow (sin phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(* theta (* (cos phi1) (sin delta)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* delta (* (cos phi1) (sin theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (sin delta) (sin theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* theta (sin delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* delta (sin theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* 2 phi1)
(* 2 phi1)
(* 2 phi1)
(* 2 phi1)
(* 2 phi1)
(* 2 phi1)
(* 2 phi1)
(* 2 phi1)
(* 2 phi1)
(* 2 phi1)
(* 2 phi1)
(* 2 phi1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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))) (- (+ 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))) (- (+ 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))) (- (+ 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))) (- (+ 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))) (- (+ 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))) (- (+ 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))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (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)))
(+ 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)))))))))
(/ 1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ (* -1 (/ lambda1 (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2))) (/ 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 (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 3)) (/ 1 (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)))) (/ 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 (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 4))) (/ 1 (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 3)))) (/ 1 (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)))) (/ 1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 lambda1)
(/ (+ 1 (* -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 (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) lambda1)
(/ (- (+ 1 (* -1 (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 3) (pow lambda1 3)))) (+ (* -1 (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -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) lambda1))
(* -1 (/ (- (* -1 (/ (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) lambda1) (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) lambda1)) 1) lambda1))
(* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 3) lambda1) (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)) lambda1)) (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) lambda1)) 1) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(/ 1 (+ 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)))
(+ 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))))))))
(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))))))))
(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)))))
(pow (cos delta) 2)
(+ (* -2 (* (pow phi1 2) (pow (cos delta) 2))) (pow (cos delta) 2))
(+ (* (pow phi1 2) (+ (* -2 (pow (cos delta) 2)) (* 5/3 (* (pow phi1 2) (pow (cos delta) 2))))) (pow (cos delta) 2))
(+ (* (pow phi1 2) (+ (* -2 (pow (cos delta) 2)) (* (pow phi1 2) (+ (* -34/45 (* (pow phi1 2) (pow (cos delta) 2))) (* 5/3 (pow (cos delta) 2)))))) (pow (cos delta) 2))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2))
(pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)
(+ (* -1 (* (pow delta 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))
(+ (* (pow delta 2) (+ (* -1 (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* 1/3 (* (pow delta 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))))) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))
(+ (* (pow delta 2) (+ (* -1 (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow delta 2) (+ (* -2/45 (* (pow delta 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))) (* 1/3 (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)))))) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))
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 (pow (sin phi1) 2))
(- (+ 1 (* -1/2 (pow delta 2))) (pow (sin phi1) 2))
(- (+ 1 (* (pow delta 2) (- (* 1/24 (pow delta 2)) 1/2))) (pow (sin phi1) 2))
(- (+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/24 (* -1/720 (pow delta 2)))) 1/2))) (pow (sin phi1) 2))
(- (cos delta) (pow (sin phi1) 2))
(- (cos delta) (pow (sin phi1) 2))
(- (cos delta) (pow (sin phi1) 2))
(- (cos delta) (pow (sin phi1) 2))
(- (cos delta) (pow (sin phi1) 2))
(- (cos delta) (pow (sin phi1) 2))
(- (cos delta) (pow (sin phi1) 2))
(- (cos delta) (pow (sin phi1) 2))
(cos delta)
(+ (cos delta) (* -1 (pow phi1 2)))
(+ (cos delta) (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))
(+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(- (cos delta) (pow (sin phi1) 2))
(- (cos delta) (pow (sin phi1) 2))
(- (cos delta) (pow (sin phi1) 2))
(- (cos delta) (pow (sin phi1) 2))
(- (cos delta) (pow (sin phi1) 2))
(- (cos delta) (pow (sin phi1) 2))
(- (cos delta) (pow (sin phi1) 2))
(- (cos delta) (pow (sin phi1) 2))
(pow phi1 2)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
1
(+ 1 (* -1 (pow phi1 2)))
(+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(* 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))))
(* (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)))
(* 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 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)))
(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)))))))
(+ 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) (* -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)))))))
(* delta (cos theta))
(* delta (+ (cos theta) (* -1/6 (* (pow delta 2) (cos theta)))))
(* delta (+ (cos theta) (* (pow delta 2) (+ (* -1/6 (cos theta)) (* 1/120 (* (pow delta 2) (cos theta)))))))
(* delta (+ (cos theta) (* (pow delta 2) (+ (* -1/6 (cos theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos theta))) (* 1/120 (cos theta))))))))
(* (cos theta) (sin delta))
(* (cos theta) (sin delta))
(* (cos theta) (sin delta))
(* (cos theta) (sin delta))
(* (cos theta) (sin delta))
(* (cos theta) (sin delta))
(* (cos theta) (sin delta))
(* (cos theta) (sin delta))
(sin delta)
(+ (sin delta) (* -1/2 (* (pow theta 2) (sin delta))))
(+ (sin delta) (* (pow theta 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow theta 2) (sin delta))))))
(+ (sin delta) (* (pow theta 2) (+ (* -1/2 (sin delta)) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (sin delta))) (* 1/24 (sin delta)))))))
(* (cos theta) (sin delta))
(* (cos theta) (sin delta))
(* (cos theta) (sin delta))
(* (cos theta) (sin delta))
(* (cos theta) (sin delta))
(* (cos theta) (sin delta))
(* (cos theta) (sin delta))
(* (cos theta) (sin delta))
Outputs
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 phi1 (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (sin.f64 delta))) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -2 (cos delta)) (+ (* -1 (cos delta)) (+ (* -1 (/ (* (pow (cos theta) 2) (pow (sin delta) 2)) (cos delta))) (/ (* (pow (cos theta) 2) (pow (sin delta) 2)) (cos delta)))))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* phi1 (- (+ (* -2 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (+ (* (cos theta) (sin delta)) (/ (* (cos theta) (* (sin delta) (- (* -2 (cos delta)) (+ (* -1 (cos delta)) (+ (* -1 (/ (* (pow (cos theta) 2) (pow (sin delta) 2)) (cos delta))) (/ (* (pow (cos theta) 2) (pow (sin delta) 2)) (cos delta))))))) (cos delta)))))))) (+ (* -1 (cos delta)) (+ (* -1 (/ (* (pow (cos theta) 2) (pow (sin delta) 2)) (cos delta))) (/ (* (pow (cos theta) 2) (pow (sin delta) 2)) (cos delta)))))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (fma.f64 phi1 (neg.f64 (fma.f64 phi1 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (+.f64 #s(literal -2/3 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 delta)) (cos.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 delta))) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (sin.f64 delta)))) (cos.f64 delta))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ 1 (* -1 (+ 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 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))))
(fma.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1 (+ (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* delta (- (* delta (- (* -1 (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))))) (+ (* -1/2 (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))))
(fma.f64 delta (-.f64 (neg.f64 (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 0 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 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)))) delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1 (+ (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (* delta (- (* delta (- (+ (* -1 (* delta (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (+ (* 1/2 (* (cos phi1) (* (cos theta) (sin phi1)))) (/ (* (cos phi1) (* (cos theta) (* (sin phi1) (- (* -1 (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))))) (+ (* -1/2 (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))))))))) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))))))) (* -1 (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))))) (+ (* -1/2 (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))))
(fma.f64 delta (-.f64 (fma.f64 delta (-.f64 (-.f64 #s(literal 0 binary64) (fma.f64 #s(literal 0 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 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 delta (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 (/.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 0 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 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))))) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) #s(literal 1/3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #s(literal 0 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(- (+ (* (pow theta 2) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2))))) (/ (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 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) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (pow.f64 (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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(- (+ (* (pow theta 2) (- (+ (* (pow theta 2) (- (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2))))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* 1/24 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2)))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2))))) (/ (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 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) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (pow.f64 (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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (*.f64 theta theta) (fma.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #s(literal -1/3 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (pow.f64 (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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (*.f64 (/.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (pow.f64 (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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) #s(literal -1/24 binary64)))) (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(- (+ (* (pow theta 2) (- (+ (* (pow theta 2) (- (+ (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (pow theta 2) (- (* 2/45 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2))))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* 1/24 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2)))))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* -1/720 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2))) (* 1/24 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2))))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))))))))) (+ (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2))))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* 1/24 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2)))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (pow (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))) 2))))) (/ (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1)))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
(fma.f64 (*.f64 theta theta) (fma.f64 (*.f64 theta theta) (fma.f64 (*.f64 theta theta) (-.f64 (/.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (fma.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #s(literal -1/3 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (pow.f64 (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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (*.f64 (/.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (pow.f64 (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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) #s(literal -1/24 binary64))))) (/.f64 (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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (fma.f64 (/.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (pow.f64 (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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #s(literal 1/24 binary64) (/.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))))) (pow.f64 (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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)))))) (fma.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #s(literal -1/3 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (pow.f64 (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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (*.f64 (/.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (pow.f64 (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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) #s(literal -1/24 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (pow.f64 (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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
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 (*.f64 phi1 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 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64)) #s(literal -1 binary64)) #s(literal 1 binary64))
(+ 1 (* -1 (+ 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 (* -1 (+ 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 (* -1 (+ 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 (* -1 (+ 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 (* -1 (+ 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 (* -1 (+ 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 (* -1 (+ 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 (* -1 (+ 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))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (/.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (/ (- (* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (+ (* (cos delta) (+ 1 (* -1 (+ 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 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (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)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(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)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (sin theta)) (cos delta)) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (sin theta)) (cos delta)) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) lambda1)) (-.f64 #s(literal 0 binary64) 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 #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 (*.f64 delta 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 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (*.f64 (sin.f64 theta) (fma.f64 (*.f64 delta delta) #s(literal -1/5040 binary64) #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))
(* 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 #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 (*.f64 theta theta) (fma.f64 (sin.f64 delta) #s(literal -1/6 binary64) (*.f64 (*.f64 theta theta) (*.f64 (sin.f64 delta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 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
(* delta (+ 1 (* -1/6 (pow delta 2))))
(*.f64 delta (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)))
(* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6))))
(*.f64 delta (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(* delta (+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/120 (* -1/5040 (pow delta 2)))) 1/6))))
(*.f64 delta (fma.f64 (*.f64 delta delta) (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)) #s(literal 1 binary64)))
(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))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))) 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) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))) 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) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))) 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) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (pow (sin phi1) 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (cos.f64 phi1))))
(* 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 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (*.f64 theta theta) #s(literal -1/6 binary64))) (*.f64 (sin.f64 delta) (cos.f64 phi1))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(*.f64 theta (fma.f64 (*.f64 theta theta) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))))) (*.f64 (sin.f64 delta) (cos.f64 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)))
(* 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 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 (*.f64 delta 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 (*.f64 delta delta) (fma.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))) (*.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi1)) (sin.f64 theta))) (*.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 (*.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 (*.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 (sin.f64 delta) #s(literal -1/2 binary64)) (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)))
(* 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 #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 (*.f64 theta theta) (fma.f64 (sin.f64 delta) #s(literal -1/6 binary64) (*.f64 (*.f64 theta theta) (*.f64 (sin.f64 delta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 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 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 (*.f64 delta 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 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (*.f64 (sin.f64 theta) (fma.f64 (*.f64 delta delta) #s(literal -1/5040 binary64) #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))
(* 2 phi1)
(*.f64 phi1 #s(literal 2 binary64))
(* 2 phi1)
(*.f64 phi1 #s(literal 2 binary64))
(* 2 phi1)
(*.f64 phi1 #s(literal 2 binary64))
(* 2 phi1)
(*.f64 phi1 #s(literal 2 binary64))
(* 2 phi1)
(*.f64 phi1 #s(literal 2 binary64))
(* 2 phi1)
(*.f64 phi1 #s(literal 2 binary64))
(* 2 phi1)
(*.f64 phi1 #s(literal 2 binary64))
(* 2 phi1)
(*.f64 phi1 #s(literal 2 binary64))
(* 2 phi1)
(*.f64 phi1 #s(literal 2 binary64))
(* 2 phi1)
(*.f64 phi1 #s(literal 2 binary64))
(* 2 phi1)
(*.f64 phi1 #s(literal 2 binary64))
(* 2 phi1)
(*.f64 phi1 #s(literal 2 binary64))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) lambda1)) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) lambda1)) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) lambda1)) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))) lambda1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ 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 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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)))
(-.f64 #s(literal 0 binary64) (*.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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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)))
(-.f64 #s(literal 0 binary64) (*.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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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)))
(-.f64 #s(literal 0 binary64) (*.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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))))
(+ 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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))
(/ 1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(/.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))
(+ (* -1 (/ lambda1 (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2))) (/ 1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(-.f64 (/.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) (/.f64 lambda1 (pow.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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))))
(+ (* lambda1 (- (/ lambda1 (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 3)) (/ 1 (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)))) (/ 1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(fma.f64 lambda1 (+.f64 (/.f64 #s(literal -1 binary64) (pow.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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (/.f64 lambda1 (pow.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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(+ (* lambda1 (- (* lambda1 (+ (* -1 (/ lambda1 (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 4))) (/ 1 (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 3)))) (/ 1 (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)))) (/ 1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
(fma.f64 lambda1 (fma.f64 lambda1 (-.f64 (/.f64 #s(literal 1 binary64) (pow.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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64))) (/.f64 lambda1 (pow.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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64)))) (/.f64 #s(literal -1 binary64) (pow.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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ (+ 1 (* -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)
(/.f64 (-.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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)) lambda1)
(/ (- (+ 1 (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) lambda1)
(/.f64 (fma.f64 (/.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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) 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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)) #s(literal 1 binary64)) lambda1)
(/ (- (+ 1 (* -1 (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 3) (pow lambda1 3)))) (+ (* -1 (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))) lambda1)
(/.f64 (-.f64 (fma.f64 (/.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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) 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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)) #s(literal 1 binary64)) (pow.f64 (/.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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) #s(literal 3 binary64))) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(* -1 (/ (- (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1) 1) lambda1))
(/.f64 (-.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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)) lambda1)
(* -1 (/ (- (* -1 (/ (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2) lambda1) (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) lambda1)) 1) lambda1))
(/.f64 (fma.f64 (/.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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) 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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)) #s(literal 1 binary64)) lambda1)
(* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 3) lambda1) (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) 2)) lambda1)) (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) lambda1)) 1) lambda1))
(/.f64 (-.f64 (fma.f64 (/.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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) 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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)) #s(literal 1 binary64)) (pow.f64 (/.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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) #s(literal 3 binary64))) lambda1)
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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)))
(-.f64 #s(literal 0 binary64) (*.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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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)))
(-.f64 #s(literal 0 binary64) (*.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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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)))
(-.f64 #s(literal 0 binary64) (*.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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1))))
(+ 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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(*.f64 (*.f64 phi1 phi1) (fma.f64 #s(literal -1/3 binary64) (*.f64 phi1 phi1) #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 #s(literal 2/45 binary64) (*.f64 phi1 phi1) #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))
(pow (cos delta) 2)
(pow.f64 (cos.f64 delta) #s(literal 2 binary64))
(+ (* -2 (* (pow phi1 2) (pow (cos delta) 2))) (pow (cos delta) 2))
(*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))
(+ (* (pow phi1 2) (+ (* -2 (pow (cos delta) 2)) (* 5/3 (* (pow phi1 2) (pow (cos delta) 2))))) (pow (cos delta) 2))
(fma.f64 (*.f64 phi1 phi1) (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (fma.f64 #s(literal 5/3 binary64) (*.f64 phi1 phi1) #s(literal -2 binary64))) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))
(+ (* (pow phi1 2) (+ (* -2 (pow (cos delta) 2)) (* (pow phi1 2) (+ (* -34/45 (* (pow phi1 2) (pow (cos delta) 2))) (* 5/3 (pow (cos delta) 2)))))) (pow (cos delta) 2))
(fma.f64 (*.f64 phi1 phi1) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (*.f64 (*.f64 phi1 phi1) (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (fma.f64 #s(literal -34/45 binary64) (*.f64 phi1 phi1) #s(literal 5/3 binary64))))) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))
(*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))
(*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))
(*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))
(*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2))
(*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2))
(*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2))
(*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))) 2))
(*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)
(pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(+ (* -1 (* (pow delta 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))
(*.f64 (fma.f64 delta (-.f64 #s(literal 0 binary64) delta) #s(literal 1 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(+ (* (pow delta 2) (+ (* -1 (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* 1/3 (* (pow delta 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))))) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))
(fma.f64 (*.f64 delta delta) (*.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (*.f64 delta delta) #s(literal -1 binary64))) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(+ (* (pow delta 2) (+ (* -1 (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)) (* (pow delta 2) (+ (* -2/45 (* (pow delta 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))) (* 1/3 (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2)))))) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))
(fma.f64 (fma.f64 delta (-.f64 #s(literal 0 binary64) delta) #s(literal 1 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 delta delta) (*.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (*.f64 delta delta) #s(literal 1/3 binary64))))))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))
(*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))
(*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))
(*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))
(*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))
(*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))
(*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))
(*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(* (pow (cos delta) 2) (pow (+ 1 (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))) 2))
(*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
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 #s(literal -1/720 binary64) (*.f64 delta delta) #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 (pow (sin phi1) 2))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(- (+ 1 (* -1/2 (pow delta 2))) (pow (sin phi1) 2))
(fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* (pow delta 2) (- (* 1/24 (pow delta 2)) 1/2))) (pow (sin phi1) 2))
(fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 delta delta) #s(literal -1/2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/24 (* -1/720 (pow delta 2)))) 1/2))) (pow (sin phi1) 2))
(fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (fma.f64 #s(literal -1/720 binary64) (*.f64 delta delta) #s(literal 1/24 binary64)) #s(literal -1/2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(- (cos delta) (pow (sin phi1) 2))
(-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (cos delta) (pow (sin phi1) 2))
(-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (cos delta) (pow (sin phi1) 2))
(-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (cos delta) (pow (sin phi1) 2))
(-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (cos delta) (pow (sin phi1) 2))
(-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (cos delta) (pow (sin phi1) 2))
(-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (cos delta) (pow (sin phi1) 2))
(-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (cos delta) (pow (sin phi1) 2))
(-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (pow phi1 2)))
(fma.f64 phi1 (-.f64 #s(literal 0 binary64) phi1) (cos.f64 delta))
(+ (cos delta) (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))
(fma.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/3 binary64) #s(literal -1 binary64)) (cos.f64 delta))
(+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(fma.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)) (cos.f64 delta))
(- (cos delta) (pow (sin phi1) 2))
(-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (cos delta) (pow (sin phi1) 2))
(-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (cos delta) (pow (sin phi1) 2))
(-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (cos delta) (pow (sin phi1) 2))
(-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (cos delta) (pow (sin phi1) 2))
(-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (cos delta) (pow (sin phi1) 2))
(-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (cos delta) (pow (sin phi1) 2))
(-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (cos delta) (pow (sin phi1) 2))
(-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(*.f64 (*.f64 phi1 phi1) (fma.f64 #s(literal -1/3 binary64) (*.f64 phi1 phi1) #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 #s(literal 2/45 binary64) (*.f64 phi1 phi1) #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)))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
1
#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 (*.f64 phi1 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 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64)) #s(literal -1 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 (* 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))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))
(*.f64 phi1 (fma.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(* phi1 (+ (* (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 (cos.f64 theta) (sin.f64 delta)) #s(literal 2/15 binary64)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (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 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)) (*.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 2/15 binary64) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal -4/315 binary64)))))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(* delta (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* (cos phi1) (* (cos theta) (sin phi1)))))
(*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #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 delta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (fma.f64 (*.f64 delta 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 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (fma.f64 (*.f64 delta delta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (*.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(* (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.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)))))
(+ (* (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 (*.f64 theta theta) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (fma.f64 #s(literal -1/720 binary64) (*.f64 theta theta) #s(literal 1/24 binary64))))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(* (cos theta) (sin delta))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(+ (* -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 (cos.f64 theta) (sin.f64 delta)))
(+ (* (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 (cos.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 theta) (sin.f64 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))))))))
(fma.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 theta)) (sin.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* delta (* (cos phi1) (cos theta)))
(*.f64 (*.f64 delta (cos.f64 phi1)) (cos.f64 theta))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* (cos phi1) (cos theta))))
(*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 theta) (cos.f64 phi1))))
(* 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 theta) (cos.f64 phi1)) (fma.f64 (*.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (cos.f64 theta) (cos.f64 phi1))))
(* 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 (*.f64 delta delta) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (fma.f64 (*.f64 delta delta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))) (*.f64 (cos.f64 theta) (cos.f64 phi1))))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(+ (* -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 (sin.f64 delta) (cos.f64 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 theta theta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 theta theta) #s(literal -1/2 binary64))) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta))))))))
(fma.f64 (*.f64 theta theta) (fma.f64 (*.f64 theta theta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 theta theta) #s(literal 1/24 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (sin.f64 delta))) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 phi1 (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (sin.f64 delta))) (cos.f64 delta))
(+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))
(fma.f64 phi1 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))) (cos.f64 delta))
(+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (* -1 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 phi1 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 2/3 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (sin.f64 delta)))) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))
(+ 1 (* -1 (pow (sin phi1) 2)))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(+ 1 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* -1 (pow (sin phi1) 2))))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/2 (pow (sin phi1) 2)) 1/2))))))
(fma.f64 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) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (pow (sin phi1) 2))) 1/2))))))
(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) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))))) (pow.f64 (cos.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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 theta theta)) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))))
(-.f64 (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))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
(-.f64 (fma.f64 (*.f64 theta theta) (fma.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64))) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(+ (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))
(* delta (cos theta))
(*.f64 delta (cos.f64 theta))
(* delta (+ (cos theta) (* -1/6 (* (pow delta 2) (cos theta)))))
(*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (cos.f64 theta)))
(* delta (+ (cos theta) (* (pow delta 2) (+ (* -1/6 (cos theta)) (* 1/120 (* (pow delta 2) (cos theta)))))))
(*.f64 delta (fma.f64 (*.f64 delta delta) (*.f64 (cos.f64 theta) (fma.f64 (*.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (cos.f64 theta)))
(* delta (+ (cos theta) (* (pow delta 2) (+ (* -1/6 (cos theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos theta))) (* 1/120 (cos theta))))))))
(*.f64 delta (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (*.f64 (cos.f64 theta) (fma.f64 (*.f64 delta delta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (*.f64 (cos.f64 theta) #s(literal -1/6 binary64))) (cos.f64 theta)))
(* (cos theta) (sin delta))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(* (cos theta) (sin delta))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(* (cos theta) (sin delta))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(* (cos theta) (sin delta))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(* (cos theta) (sin delta))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(* (cos theta) (sin delta))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(* (cos theta) (sin delta))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(* (cos theta) (sin delta))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(sin delta)
(sin.f64 delta)
(+ (sin delta) (* -1/2 (* (pow theta 2) (sin delta))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta))
(+ (sin delta) (* (pow theta 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow theta 2) (sin delta))))))
(fma.f64 (*.f64 theta theta) (*.f64 (sin.f64 delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 theta theta) #s(literal -1/2 binary64))) (sin.f64 delta))
(+ (sin delta) (* (pow theta 2) (+ (* -1/2 (sin delta)) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (sin delta))) (* 1/24 (sin delta)))))))
(fma.f64 (*.f64 theta theta) (fma.f64 (*.f64 theta theta) (*.f64 (sin.f64 delta) (fma.f64 #s(literal -1/720 binary64) (*.f64 theta theta) #s(literal 1/24 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))) (sin.f64 delta))
(* (cos theta) (sin delta))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(* (cos theta) (sin delta))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(* (cos theta) (sin delta))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(* (cos theta) (sin delta))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(* (cos theta) (sin delta))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(* (cos theta) (sin delta))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(* (cos theta) (sin delta))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(* (cos theta) (sin delta))
(*.f64 (cos.f64 theta) (sin.f64 delta))

eval376.0ms (2%)

Memory
44.8MiB live, 698.5MiB allocated
Compiler

Compiled 92 447 to 4 515 computations (95.1% saved)

prune262.0ms (1.4%)

Memory
-23.4MiB live, 591.6MiB allocated
Pruning

45 alts after pruning (44 fresh and 1 done)

PrunedKeptTotal
New1 982292 011
Fresh181533
Picked415
Done000
Total2 004452 049
Accuracy
100.0%
Counts
2 049 → 45
Alt Table
Click to see full alt table
StatusAccuracyProgram
46.8%
(pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal 1/2 binary64)) #s(literal 2 binary64))
18.4%
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
15.5%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
20.2%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
20.5%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
38.0%
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) lambda1))))
95.5%
(/.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 (sin.f64 delta) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))
83.9%
(/.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))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
72.2%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) lambda1))
90.0%
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) lambda1)
99.8%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1)
94.1%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) lambda1)
74.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta)))
84.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))))
84.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))))
94.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))
85.2%
(+.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 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 phi1)))))
95.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))
85.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))))
95.6%
(+.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))))))
89.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta))) (sin.f64 phi1)) #s(literal 2 binary64)))))
90.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))))
95.6%
(+.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)))))))
89.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
80.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 phi1 phi1))))
74.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))) #s(literal -1 binary64)))))
76.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 phi1)) (cos.f64 delta)))
90.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta)) (cos.f64 delta)))
77.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
72.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))))
78.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))) (sin.f64 theta)) (cos.f64 delta)))
78.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 phi1)) (cos.f64 delta)))
81.8%
(+.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))))
88.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
88.3%
(+.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))))))))
88.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
80.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64)))
73.5%
(+.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.2%
(+.f64 lambda1 (atan2.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 delta)))
78.5%
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)))
78.3%
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
46.6%
(*.f64 (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
45.6%
(*.f64 (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)) (*.f64 lambda1 (*.f64 lambda1 lambda1)))) (fma.f64 lambda1 (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))))
53.7%
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))))
Compiler

Compiled 2 745 to 1 627 computations (40.7% saved)

simplify291.0ms (1.6%)

Memory
-2.0MiB live, 152.8MiB allocated
Algorithm
egg-herbie
Localize:

Found 18 expressions of interest:

NewMetricScoreProgram
cost-diff0
(sin.f64 theta)
cost-diff0
(sin.f64 delta)
cost-diff0
(cos.f64 phi1)
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
cost-diff0
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
cost-diff1408
(/.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))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
cost-diff0
(cos.f64 (-.f64 theta delta))
cost-diff0
(-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))
cost-diff0
(atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta)))
cost-diff0
(/.f64 #s(literal 1 binary64) lambda1)
cost-diff1408
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) lambda1))
cost-diff0
(sin.f64 delta)
cost-diff0
(cos.f64 phi1)
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))
cost-diff0
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1)
Rules
3 144×lower-fma.f32
3 138×lower-fma.f64
1 572×lower-*.f32
1 552×lower-*.f64
648×cancel-sign-sub-inv
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
050450
094437
1150437
2295437
3591437
4906437
51217437
61674437
72186437
82731437
93033437
103190437
113226437
123246437
133250437
143280437
153292437
163292437
03292437
Stop Event
iter limit
saturated
iter limit
Calls
Call 1
Inputs
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1)
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(cos.f64 phi1)
phi1
(*.f64 (sin.f64 delta) (sin.f64 theta))
(sin.f64 delta)
delta
(sin.f64 theta)
theta
(-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))
(*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(cos.f64 delta)
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(cos.f64 (+.f64 phi1 phi1))
(+.f64 phi1 phi1)
(*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))
(cos.f64 theta)
(*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(sin.f64 phi1)
lambda1
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) lambda1))
#s(literal 1 binary64)
(/.f64 #s(literal 1 binary64) lambda1)
lambda1
(+.f64 lambda1 (atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta)))
lambda1
(atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta))
(*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))
(-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))
(cos.f64 (-.f64 theta delta))
(-.f64 theta delta)
theta
delta
(cos.f64 (+.f64 delta theta))
(+.f64 delta theta)
#s(literal 1/2 binary64)
(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))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
#s(literal 1 binary64)
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(cos.f64 phi1)
phi1
(*.f64 (sin.f64 delta) (sin.f64 theta))
(sin.f64 delta)
delta
(sin.f64 theta)
theta
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
#s(literal 2 binary64)
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(cos.f64 phi1)
phi1
(*.f64 (sin.f64 delta) (sin.f64 theta))
(sin.f64 delta)
delta
(sin.f64 theta)
theta
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))))
(cos.f64 theta)
(*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(-.f64 #s(literal 0 binary64) (sin.f64 phi1))
#s(literal 0 binary64)
(sin.f64 phi1)
(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)
(cos.f64 (*.f64 phi1 #s(literal -2 binary64)))
(*.f64 phi1 #s(literal -2 binary64))
#s(literal -2 binary64)
Outputs
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1)
(+.f64 (atan2.f64 (fma.f64 (sin.f64 theta) (fma.f64 (cos.f64 phi1) (sin.f64 delta) #s(literal 0 binary64)) #s(literal 0 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (fma.f64 (cos.f64 phi1) (fma.f64 (sin.f64 delta) (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 theta)) #s(literal 0 binary64)))) lambda1)
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))
(atan2.f64 (fma.f64 (sin.f64 theta) (fma.f64 (cos.f64 phi1) (sin.f64 delta) #s(literal 0 binary64)) #s(literal 0 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (fma.f64 (cos.f64 phi1) (fma.f64 (sin.f64 delta) (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 theta)) #s(literal 0 binary64))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(fma.f64 (sin.f64 theta) (fma.f64 (cos.f64 phi1) (sin.f64 delta) #s(literal 0 binary64)) #s(literal 0 binary64))
(cos.f64 phi1)
phi1
(*.f64 (sin.f64 delta) (sin.f64 theta))
(fma.f64 (sin.f64 delta) (sin.f64 theta) #s(literal 0 binary64))
(sin.f64 delta)
delta
(sin.f64 theta)
theta
(-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (fma.f64 (cos.f64 phi1) (fma.f64 (sin.f64 delta) (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 theta)) #s(literal 0 binary64)))
(*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 0 binary64))
(cos.f64 delta)
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(cos.f64 (+.f64 phi1 phi1))
(+.f64 phi1 phi1)
(*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 theta) (fma.f64 (sin.f64 delta) (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 0 binary64)) #s(literal 0 binary64))
(cos.f64 theta)
(*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))
(fma.f64 (cos.f64 phi1) (fma.f64 (sin.f64 delta) (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 0 binary64))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(fma.f64 (sin.f64 delta) (sin.f64 phi1) #s(literal 0 binary64))
(sin.f64 phi1)
lambda1
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) lambda1))
lambda1
#s(literal 1 binary64)
(/.f64 #s(literal 1 binary64) lambda1)
lambda1
(+.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 (fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 0 binary64)) (cos.f64 delta)))
lambda1
(atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta))
(atan2.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 0 binary64)) (cos.f64 delta))
(*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 0 binary64))
(-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))
(cos.f64 (-.f64 theta delta))
(-.f64 theta delta)
theta
delta
(cos.f64 (+.f64 delta theta))
(+.f64 delta theta)
#s(literal 1/2 binary64)
(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))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (fma.f64 (sin.f64 theta) (fma.f64 (cos.f64 phi1) (sin.f64 delta) #s(literal 0 binary64)) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
#s(literal 1 binary64)
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (fma.f64 (sin.f64 theta) (fma.f64 (cos.f64 phi1) (sin.f64 delta) #s(literal 0 binary64)) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+.f64 lambda1 (atan2.f64 (fma.f64 (sin.f64 theta) (fma.f64 (cos.f64 phi1) (sin.f64 delta) #s(literal 0 binary64)) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2.f64 (fma.f64 (sin.f64 theta) (fma.f64 (cos.f64 phi1) (sin.f64 delta) #s(literal 0 binary64)) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(fma.f64 (sin.f64 theta) (fma.f64 (cos.f64 phi1) (sin.f64 delta) #s(literal 0 binary64)) #s(literal 0 binary64))
(cos.f64 phi1)
phi1
(*.f64 (sin.f64 delta) (sin.f64 theta))
(fma.f64 (sin.f64 delta) (sin.f64 theta) #s(literal 0 binary64))
(sin.f64 delta)
delta
(sin.f64 theta)
theta
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
#s(literal 2 binary64)
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2.f64 (fma.f64 (sin.f64 theta) (fma.f64 (cos.f64 phi1) (sin.f64 delta) #s(literal 0 binary64)) #s(literal 0 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 0 binary64)) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 theta) (fma.f64 (sin.f64 delta) (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 0 binary64)) #s(literal -1/2 binary64))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(fma.f64 (sin.f64 theta) (fma.f64 (cos.f64 phi1) (sin.f64 delta) #s(literal 0 binary64)) #s(literal 0 binary64))
(cos.f64 phi1)
phi1
(*.f64 (sin.f64 delta) (sin.f64 theta))
(fma.f64 (sin.f64 delta) (sin.f64 theta) #s(literal 0 binary64))
(sin.f64 delta)
delta
(sin.f64 theta)
theta
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 0 binary64)) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 theta) (fma.f64 (sin.f64 delta) (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 0 binary64)) #s(literal -1/2 binary64)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))))
(-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 theta) (fma.f64 (sin.f64 delta) (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 0 binary64)))
(cos.f64 theta)
(*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(-.f64 #s(literal 0 binary64) (fma.f64 (sin.f64 delta) (sin.f64 phi1) #s(literal 0 binary64)))
(-.f64 #s(literal 0 binary64) (sin.f64 phi1))
#s(literal 0 binary64)
(sin.f64 phi1)
(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)
(cos.f64 (*.f64 phi1 #s(literal -2 binary64)))
(*.f64 phi1 #s(literal -2 binary64))
#s(literal -2 binary64)

localize484.0ms (2.6%)

Memory
-30.2MiB live, 721.8MiB allocated
Localize:

Found 18 expressions of interest:

NewMetricScoreProgram
accuracy99.7%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
accuracy99.7%
(*.f64 (sin.f64 delta) (sin.f64 theta))
accuracy99.7%
(*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))
accuracy99.4%
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
accuracy99.8%
(/.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))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
accuracy99.7%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
accuracy99.7%
(*.f64 (sin.f64 delta) (sin.f64 theta))
accuracy99.6%
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
accuracy99.9%
(atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta))
accuracy78.2%
(cos.f64 (+.f64 delta theta))
accuracy78.1%
(cos.f64 (-.f64 theta delta))
accuracy40.0%
(-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))
accuracy100.0%
(/.f64 #s(literal 1 binary64) lambda1)
accuracy99.8%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) lambda1))
accuracy99.7%
(*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))
accuracy99.7%
(*.f64 (sin.f64 delta) (sin.f64 theta))
accuracy99.7%
(*.f64 (sin.f64 delta) (sin.f64 phi1))
accuracy99.4%
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
Samples
370.0ms248×1valid
5.0ms0valid
Compiler

Compiled 452 to 56 computations (87.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 319.0ms
ival-cos: 92.0ms (28.8% of total)
ival-add: 74.0ms (23.2% of total)
adjust: 47.0ms (14.7% of total)
ival-mult: 36.0ms (11.3% of total)
ival-sin: 29.0ms (9.1% of total)
ival-atan2: 18.0ms (5.6% of total)
ival-sub: 9.0ms (2.8% of total)
ival-div: 9.0ms (2.8% of total)
ival-pow2: 5.0ms (1.6% of total)
exact: 1.0ms (0.3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series34.0ms (0.2%)

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

156 calls:

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

rewrite390.0ms (2.1%)

Memory
29.6MiB live, 665.1MiB allocated
Algorithm
batch-egg-rewrite
Rules
4 828×lower-*.f32
4 808×lower-*.f64
3 780×lower-fma.f32
3 774×lower-fma.f64
3 698×lower-/.f32
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
050261
094254
1339230
22456230
08947230
Stop Event
iter limit
node limit
iter limit
Counts
24 → 558
Calls
Call 1
Inputs
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1)
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))
(cos.f64 phi1)
(sin.f64 delta)
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) lambda1))
(/.f64 #s(literal 1 binary64) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta)))
(atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta))
(-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))
(cos.f64 (-.f64 theta 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))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(sin.f64 theta)
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))
(cos.f64 (+.f64 delta theta))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))
Outputs
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) lambda1)))
(fma.f64 lambda1 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))))
(fma.f64 #s(literal 1 binary64) lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))))
(fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) lambda1) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))))
(fma.f64 #s(literal -1 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) lambda1) #s(literal 1 binary64)) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))))
(fma.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) (pow.f64 lambda1 #s(literal 1/2 binary64)) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))))
(fma.f64 (pow.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) #s(literal 1 binary64)) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))))
(fma.f64 (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal -1 binary64)) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)))))) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)))))) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.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))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) #s(literal 3 binary64))) (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)))))) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) #s(literal 2 binary64))))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) lambda1))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) 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))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)))))) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda1 lambda1 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) lambda1)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) lambda1)))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) lambda1)) (*.f64 (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) lambda1) (*.f64 lambda1 lambda1))) (*.f64 (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) lambda1) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) lambda1)))
(/.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))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)))))) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) (neg.f64 (neg.f64 (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) lambda1))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))))))
(pow.f64 (/.f64 (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)))))) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) #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))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)))))) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) #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))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) lambda1)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)))))
(exp.f64 (log.f64 (cos.f64 phi1)))
(cos.f64 phi1)
(pow.f64 (cos.f64 phi1) #s(literal 1 binary64))
(pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (cos.f64 phi1)) #s(literal 2 binary64))
(*.f64 (sqrt.f64 (cos.f64 phi1)) (sqrt.f64 (cos.f64 phi1)))
(*.f64 (pow.f64 (sqrt.f64 (cos.f64 phi1)) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (cos.f64 phi1)) #s(literal 1 binary64)))
(sin.f64 delta)
lambda1
(exp.f64 (log.f64 lambda1))
(exp.f64 (*.f64 (log.f64 lambda1) #s(literal 1 binary64)))
(neg.f64 (-.f64 #s(literal 0 binary64) lambda1))
(/.f64 lambda1 #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) lambda1))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) lambda1))
(/.f64 (-.f64 #s(literal 0 binary64) lambda1) #s(literal -1 binary64))
(pow.f64 lambda1 #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) lambda1) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda1)) #s(literal -1/2 binary64))
(pow.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) #s(literal 2 binary64))
(*.f64 lambda1 #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) lambda1)
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) lambda1))
(*.f64 #s(literal -1 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) lambda1) #s(literal 1 binary64)))
(*.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) (pow.f64 lambda1 #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(exp.f64 (-.f64 #s(literal 0 binary64) (log.f64 lambda1)))
(exp.f64 (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 lambda1)) #s(literal 1 binary64)))
(neg.f64 (/.f64 #s(literal -1 binary64) lambda1))
(/.f64 #s(literal 1 binary64) lambda1)
(/.f64 (/.f64 #s(literal 1 binary64) lambda1) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) lambda1))
(/.f64 (/.f64 #s(literal -1 binary64) lambda1) #s(literal -1 binary64))
(pow.f64 lambda1 #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) lambda1) #s(literal 1 binary64))
(pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))
(pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal 2 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) lambda1))
(*.f64 (/.f64 #s(literal 1 binary64) lambda1) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) lambda1))
(*.f64 #s(literal -1 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) lambda1) #s(literal 1 binary64)))
(*.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) (pow.f64 lambda1 #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) lambda1)
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))))
(fma.f64 lambda1 #s(literal 1 binary64) (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(fma.f64 #s(literal 1 binary64) lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) lambda1) (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(fma.f64 #s(literal -1 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) lambda1) #s(literal 1 binary64)) (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(fma.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) (pow.f64 lambda1 #s(literal 1/2 binary64)) (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(fma.f64 (pow.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) #s(literal 1 binary64)) (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(fma.f64 (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal -1 binary64)) (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.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 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))))
(/.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.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 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) lambda1))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64)))) (*.f64 (-.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)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.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 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) lambda1)))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.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 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.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 (cos.f64 (-.f64 theta delta)) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 delta theta))))
(+.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) (fma.f64 (sin.f64 delta) (sin.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 delta theta)))))
(+.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) (-.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 (+.f64 delta theta))))
(+.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 delta theta))) (cos.f64 (-.f64 theta delta)))
(+.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (*.f64 (cos.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))
(-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 theta delta)) #s(literal 3 binary64)) (fma.f64 (cos.f64 (+.f64 delta theta)) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))))) (/.f64 (pow.f64 (cos.f64 (+.f64 delta theta)) #s(literal 3 binary64)) (fma.f64 (cos.f64 (+.f64 delta theta)) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 delta theta))))) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))))
(fma.f64 (cos.f64 delta) (cos.f64 theta) (fma.f64 (sin.f64 delta) (sin.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 delta theta)))))
(fma.f64 (cos.f64 delta) (cos.f64 theta) (-.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 (+.f64 delta theta))))
(fma.f64 (cos.f64 theta) (cos.f64 delta) (fma.f64 (sin.f64 delta) (sin.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 delta theta)))))
(fma.f64 (cos.f64 theta) (cos.f64 delta) (-.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 (+.f64 delta theta))))
(fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 delta theta)) (cos.f64 (-.f64 theta delta)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (+.f64 delta theta)) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta)))))) (-.f64 (pow.f64 (cos.f64 (-.f64 theta delta)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 delta theta)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 delta theta))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 delta theta)) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta)))))) (-.f64 (pow.f64 (cos.f64 (-.f64 theta delta)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 delta theta)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 delta theta)))))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 theta delta)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 delta theta)) #s(literal 3 binary64))) (fma.f64 (cos.f64 (+.f64 delta theta)) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta)))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 theta delta)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 delta theta)) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 delta theta))))) (*.f64 (cos.f64 (-.f64 theta delta)) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 delta theta)))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 delta theta)))))) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 delta theta)))))) (-.f64 (cos.f64 (-.f64 theta delta)) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 delta theta)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 theta delta)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 delta theta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 (+.f64 delta theta)) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 theta delta)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 delta theta)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 delta theta))))) (*.f64 (cos.f64 (-.f64 theta delta)) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 delta theta))))))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 delta theta))))))) (neg.f64 (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 delta theta))))))) (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 delta theta))))))
(/.f64 (-.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 theta)))))) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 theta))))) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 3 binary64))))) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 theta))))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 theta)))))))
(/.f64 (-.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 3 binary64))) (cos.f64 (-.f64 theta delta))) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 theta))))) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 2 binary64))))) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 theta))))) (cos.f64 (-.f64 theta delta))))
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 theta)))))) (*.f64 (cos.f64 (+.f64 delta theta)) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 3 binary64))))) (*.f64 (cos.f64 (+.f64 delta theta)) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 theta)))))))
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 2 binary64))) (cos.f64 (-.f64 theta delta))) (*.f64 (cos.f64 (+.f64 delta theta)) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 2 binary64))))) (*.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 theta delta)) #s(literal 3 binary64)) (fma.f64 (cos.f64 (+.f64 delta theta)) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))))) (*.f64 (fma.f64 (cos.f64 (+.f64 delta theta)) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta)))))) (pow.f64 (cos.f64 (+.f64 delta theta)) #s(literal 3 binary64)))) (*.f64 (fma.f64 (cos.f64 (+.f64 delta theta)) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta)))))) (fma.f64 (cos.f64 (+.f64 delta theta)) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) (*.f64 (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 delta theta))))))) (*.f64 (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 theta delta)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 delta theta)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 delta theta)) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta)))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 delta theta)))))))) (neg.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))))
(pow.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 delta theta)) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta)))))) (-.f64 (pow.f64 (cos.f64 (-.f64 theta delta)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 delta theta)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 delta theta))))))) #s(literal -1 binary64))
(*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (*.f64 (-.f64 theta (+.f64 delta (+.f64 delta theta))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (+.f64 (+.f64 (-.f64 theta delta) delta) theta) #s(literal 1/2 binary64)))))
(*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (-.f64 delta theta) (+.f64 delta theta)) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (-.f64 delta theta) (+.f64 delta theta)) #s(literal 2 binary64)))))
(*.f64 (*.f64 (sin.f64 (*.f64 (-.f64 theta (+.f64 delta (+.f64 delta theta))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (+.f64 (+.f64 (-.f64 theta delta) delta) theta) #s(literal 1/2 binary64)))) #s(literal -2 binary64))
(*.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 theta delta)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 delta theta)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 delta theta)) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))))))
(*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 delta theta)))))) (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))))
(*.f64 (*.f64 #s(literal -2 binary64) (sin.f64 (*.f64 (-.f64 theta (+.f64 delta (+.f64 delta theta))) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (+.f64 (+.f64 (-.f64 theta delta) delta) theta) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (cos.f64 delta) (cos.f64 theta)))
(+.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 theta (*.f64 theta theta)) (fma.f64 delta (+.f64 delta theta) (*.f64 theta theta)))) (cos.f64 (/.f64 (*.f64 delta (*.f64 delta delta)) (fma.f64 delta (+.f64 delta theta) (*.f64 theta theta))))) (*.f64 (sin.f64 (/.f64 (*.f64 theta (*.f64 theta theta)) (fma.f64 delta (+.f64 delta theta) (*.f64 theta theta)))) (sin.f64 (/.f64 (*.f64 delta (*.f64 delta delta)) (fma.f64 delta (+.f64 delta theta) (*.f64 theta theta))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 theta theta) (+.f64 delta theta))) (cos.f64 (/.f64 (*.f64 delta delta) (+.f64 delta theta)))) (*.f64 (sin.f64 (/.f64 (*.f64 theta theta) (+.f64 delta theta))) (sin.f64 (/.f64 (*.f64 delta delta) (+.f64 delta theta)))))
(cos.f64 (-.f64 theta delta))
(cos.f64 (-.f64 delta theta))
(-.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) (*.f64 (sin.f64 theta) (sin.f64 (-.f64 #s(literal 0 binary64) delta))))
(-.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) (*.f64 (sin.f64 (-.f64 #s(literal 0 binary64) delta)) (sin.f64 theta)))
(-.f64 (*.f64 (cos.f64 delta) (cos.f64 (neg.f64 theta))) (*.f64 (sin.f64 delta) (sin.f64 (neg.f64 theta))))
(fma.f64 (sin.f64 delta) (sin.f64 theta) (*.f64 (cos.f64 delta) (cos.f64 theta)))
(fma.f64 (sin.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (*.f64 (cos.f64 delta) (cos.f64 theta)))
(fma.f64 (cos.f64 theta) (cos.f64 delta) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(fma.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64) (*.f64 (cos.f64 delta) (cos.f64 theta)))
(fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 (-.f64 theta (+.f64 delta (+.f64 delta theta))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (+.f64 (+.f64 (-.f64 theta delta) delta) theta) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 delta) (cos.f64 theta)))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 (-.f64 theta (+.f64 delta (+.f64 delta theta))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (+.f64 (+.f64 (-.f64 theta delta) delta) theta) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 delta) (cos.f64 theta)))
(fma.f64 (cos.f64 (/.f64 (*.f64 theta (*.f64 theta theta)) (fma.f64 delta (+.f64 delta theta) (*.f64 theta theta)))) (cos.f64 (/.f64 (*.f64 delta (*.f64 delta delta)) (fma.f64 delta (+.f64 delta theta) (*.f64 theta theta)))) (*.f64 (sin.f64 (/.f64 (*.f64 theta (*.f64 theta theta)) (fma.f64 delta (+.f64 delta theta) (*.f64 theta theta)))) (sin.f64 (/.f64 (*.f64 delta (*.f64 delta delta)) (fma.f64 delta (+.f64 delta theta) (*.f64 theta theta))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 theta theta) (+.f64 delta theta))) (cos.f64 (/.f64 (*.f64 delta delta) (+.f64 delta theta))) (*.f64 (sin.f64 (/.f64 (*.f64 theta theta) (+.f64 delta theta))) (sin.f64 (/.f64 (*.f64 delta delta) (+.f64 delta theta)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 theta))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 2 binary64))) (cos.f64 (+.f64 delta theta)))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (cos.f64 (-.f64 theta delta)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 delta theta)) #s(literal 3 binary64)))) #s(literal 2 binary64) (*.f64 (fma.f64 (cos.f64 (+.f64 delta theta)) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta)))))) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) (*.f64 (fma.f64 (cos.f64 (+.f64 delta theta)) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta)))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 delta theta))))))) #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.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 (fma.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 theta delta)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 delta theta)) #s(literal 3 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64) (*.f64 (fma.f64 (cos.f64 (+.f64 delta theta)) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta)))))) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) (*.f64 (fma.f64 (cos.f64 (+.f64 delta theta)) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta)))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 delta theta)))))) #s(literal 1/2 binary64)) #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.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 (fma.f64 (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (fma.f64 (cos.f64 (+.f64 delta theta)) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta)))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (cos.f64 (-.f64 theta delta)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 delta theta)) #s(literal 3 binary64)))))) (*.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 delta theta)) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 delta theta))))))))) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (fma.f64 (cos.f64 (+.f64 delta theta)) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta)))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 theta delta)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 delta theta)) #s(literal 3 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 delta theta)) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 delta theta)))))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 theta)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 delta theta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(+.f64 lambda1 (*.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(+.f64 lambda1 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1)
(+.f64 (*.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1)
(+.f64 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) lambda1)
(exp.f64 (log.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(exp.f64 (*.f64 (log.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(fma.f64 lambda1 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 lambda1 #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(fma.f64 lambda1 #s(literal 1 binary64) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 #s(literal 1 binary64) lambda1 (*.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(fma.f64 #s(literal 1 binary64) lambda1 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1)
(fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64) lambda1)
(fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) lambda1) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (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 0 binary64) lambda1) (*.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (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 0 binary64) lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(fma.f64 #s(literal -1 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) lambda1) #s(literal 1 binary64)) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 #s(literal -1 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) lambda1) #s(literal 1 binary64)) (*.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(fma.f64 #s(literal -1 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) lambda1) #s(literal 1 binary64)) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(fma.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) (pow.f64 lambda1 #s(literal 1/2 binary64)) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) (pow.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(fma.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) (pow.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(fma.f64 (pow.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) #s(literal 1 binary64)) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) #s(literal 1 binary64)) (*.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(fma.f64 (pow.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) #s(literal 1 binary64)) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(fma.f64 (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal -1 binary64)) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(fma.f64 (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal -1 binary64)) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(/.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) 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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(/.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) 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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))))
(/.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) 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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1))
(/.f64 (*.f64 #s(literal 1 binary64) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(/.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) 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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal -1/2 binary64))
(*.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(*.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(*.f64 #s(literal -1 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(*.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1) (*.f64 lambda1 lambda1))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(exp.f64 (-.f64 #s(literal 0 binary64) (log.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(exp.f64 (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(/.f64 (/.f64 #s(literal -1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #s(literal -1 binary64))
(pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #s(literal 1 binary64))
(pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64))
(*.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(*.f64 #s(literal -1 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)) (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1) (*.f64 lambda1 lambda1)))
(*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1) (*.f64 lambda1 lambda1))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) #s(literal 1 binary64)) (pow.f64 (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal 1 binary64)) (pow.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(+.f64 lambda1 (*.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(+.f64 lambda1 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1)
(+.f64 (*.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1)
(+.f64 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) lambda1)
(exp.f64 (log.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(exp.f64 (*.f64 (log.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(fma.f64 lambda1 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 lambda1 #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(fma.f64 lambda1 #s(literal 1 binary64) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 #s(literal 1 binary64) lambda1 (*.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(fma.f64 #s(literal 1 binary64) lambda1 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1)
(fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64) lambda1)
(fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) lambda1) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (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 0 binary64) lambda1) (*.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (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 0 binary64) lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(fma.f64 #s(literal -1 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) lambda1) #s(literal 1 binary64)) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 #s(literal -1 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) lambda1) #s(literal 1 binary64)) (*.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(fma.f64 #s(literal -1 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) lambda1) #s(literal 1 binary64)) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(fma.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) (pow.f64 lambda1 #s(literal 1/2 binary64)) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) (pow.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(fma.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) (pow.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(fma.f64 (pow.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) #s(literal 1 binary64)) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) #s(literal 1 binary64)) (*.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(fma.f64 (pow.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) #s(literal 1 binary64)) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(fma.f64 (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal -1 binary64)) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(fma.f64 (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal -1 binary64)) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(/.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) 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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(/.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) 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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))))
(/.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) 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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1))
(/.f64 (*.f64 #s(literal 1 binary64) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(/.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) 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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal -1/2 binary64))
(*.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(*.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(*.f64 #s(literal -1 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(*.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1) (*.f64 lambda1 lambda1))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 theta)) (sin.f64 delta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(sin.f64 theta)
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (cos.f64 phi1))))
(exp.f64 (*.f64 (log.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(exp.f64 (+.f64 (log.f64 (cos.f64 phi1)) (log.f64 (cos.f64 phi1))))
(-.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.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))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #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) (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))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))))
(/.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)) (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/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 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))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 #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/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (+.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 #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 phi1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(/.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (neg.f64 (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))))) (-.f64 #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 #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 phi1)))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (/.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))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #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))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(*.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 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))))) (-.f64 #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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #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/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) #s(literal 1 binary64)))
(*.f64 (pow.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)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 delta phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 delta)) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))))
(/.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 delta)) (cos.f64 (+.f64 phi1 delta))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 delta phi1)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 delta)) (cos.f64 (+.f64 phi1 delta)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal -1 binary64))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) #s(literal 1/2 binary64))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 theta delta))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 delta theta)))))
(+.f64 (*.f64 (cos.f64 (-.f64 theta delta)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 delta theta))) #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)))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 theta delta)) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 delta theta)))))
(fma.f64 (cos.f64 (-.f64 theta delta)) #s(literal 1/2 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 delta theta))) #s(literal 1/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 #s(literal -1 binary64) (neg.f64 (/.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 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (cos.f64 (-.f64 theta delta)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 delta theta)) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (+.f64 delta theta)) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta)))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 delta theta))))))) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))
(/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 theta delta)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 delta theta)) #s(literal 3 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 delta theta)) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta)))))))
(/.f64 (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 delta theta)))))) #s(literal 1/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 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (cos.f64 (-.f64 theta delta)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 delta theta)) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (cos.f64 (+.f64 delta theta)) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 delta theta)))))))) (neg.f64 (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 theta delta)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 delta theta)) #s(literal 3 binary64))) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (+.f64 delta theta)) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 delta theta)))))) #s(literal 1/2 binary64))) (neg.f64 (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))))
(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 #s(literal 1/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 1/2 binary64))
(*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 (-.f64 theta (+.f64 delta (+.f64 delta theta))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (+.f64 (+.f64 (-.f64 theta delta) delta) theta) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 (-.f64 theta (+.f64 delta (+.f64 delta theta))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (+.f64 (+.f64 (-.f64 theta delta) delta) theta) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (cos.f64 phi1))) #s(literal -2 binary64))
(*.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 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))
(*.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 (cos.f64 delta) (cos.f64 theta)) (neg.f64 (*.f64 (sin.f64 delta) (sin.f64 theta))))
(+.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 theta)) (sin.f64 delta)))
(+.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) (*.f64 (sin.f64 (-.f64 #s(literal 0 binary64) delta)) (sin.f64 theta)))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 delta delta) (-.f64 delta theta))) (cos.f64 (/.f64 (*.f64 theta theta) (-.f64 delta theta)))) (*.f64 (sin.f64 (/.f64 (*.f64 delta delta) (-.f64 delta theta))) (sin.f64 (/.f64 (*.f64 theta theta) (-.f64 delta theta)))))
(cos.f64 (+.f64 delta theta))
(-.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(fma.f64 (cos.f64 delta) (cos.f64 theta) (neg.f64 (*.f64 (sin.f64 delta) (sin.f64 theta))))
(fma.f64 (cos.f64 delta) (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 theta)) (sin.f64 delta)))
(fma.f64 (cos.f64 delta) (cos.f64 theta) (*.f64 (sin.f64 (-.f64 #s(literal 0 binary64) delta)) (sin.f64 theta)))
(fma.f64 (cos.f64 theta) (cos.f64 delta) (neg.f64 (*.f64 (sin.f64 delta) (sin.f64 theta))))
(fma.f64 (cos.f64 theta) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 theta)) (sin.f64 delta)))
(fma.f64 (cos.f64 theta) (cos.f64 delta) (*.f64 (sin.f64 (-.f64 #s(literal 0 binary64) delta)) (sin.f64 theta)))
(fma.f64 (cos.f64 (/.f64 (*.f64 delta delta) (-.f64 delta theta))) (cos.f64 (/.f64 (*.f64 theta theta) (-.f64 delta theta))) (*.f64 (sin.f64 (/.f64 (*.f64 delta delta) (-.f64 delta theta))) (sin.f64 (/.f64 (*.f64 theta theta) (-.f64 delta theta)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 theta))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 2 binary64))) (cos.f64 (-.f64 theta delta)))
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (fma.f64 (cos.f64 (+.f64 delta theta)) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (cos.f64 (-.f64 theta delta)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 delta theta)) #s(literal 3 binary64)))))) (*.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 delta theta)) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 delta theta))))))))) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (fma.f64 (cos.f64 (+.f64 delta theta)) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 theta delta)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 delta theta)) #s(literal 3 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 delta theta)) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 theta delta))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 delta theta)))))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 2 binary64)))) (neg.f64 (cos.f64 (-.f64 theta delta))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 delta) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 theta)))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (cos.f64 phi1))))
(exp.f64 (*.f64 (log.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(exp.f64 (+.f64 (log.f64 (cos.f64 phi1)) (log.f64 (cos.f64 phi1))))
(-.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.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))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #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) (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))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))))
(/.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)) (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/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 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))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 #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/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (+.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 #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 phi1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(/.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (neg.f64 (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))))) (-.f64 #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 #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 phi1)))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (/.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))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #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))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(*.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 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))))) (-.f64 #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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #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/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) #s(literal 1 binary64)))
(*.f64 (pow.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)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -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 #s(literal -2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64))) (/.f64 #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))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64) #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 #s(literal -2 binary64)))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/4 binary64))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -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 #s(literal -2 binary64)))))) #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 #s(literal -2 binary64)))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/4 binary64))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -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 #s(literal -2 binary64)))))) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 3 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 #s(literal -2 binary64)))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 3 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 #s(literal -2 binary64))))))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #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 #s(literal -2 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)))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 3 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 #s(literal -2 binary64)))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/4 binary64)))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 3 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 #s(literal -2 binary64))))))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #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 #s(literal -2 binary64)))))) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -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 #s(literal -2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -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 #s(literal -2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 3 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 #s(literal -2 binary64)))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #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 #s(literal -2 binary64)))))) #s(literal -1/4 binary64)))) (neg.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -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 #s(literal -2 binary64))))))))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -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 #s(literal -2 binary64)))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/4 binary64))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -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 #s(literal -2 binary64)))))) #s(literal -1/4 binary64))) #s(literal -1 binary64))
(*.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 3 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 #s(literal -2 binary64)))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #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 #s(literal -2 binary64)))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64))))
(*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(+.f64 (*.f64 (sin.f64 delta) #s(literal 0 binary64)) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))))
(+.f64 (*.f64 #s(literal 0 binary64) (sin.f64 delta)) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))))
(fma.f64 (sin.f64 delta) #s(literal 0 binary64) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))))
(fma.f64 #s(literal 0 binary64) (sin.f64 delta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))))
(neg.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(/.f64 (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(/.f64 (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (sin.f64 phi1))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 3 binary64))) (sin.f64 delta)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (sin.f64 delta)) (sin.f64 phi1))
(/.f64 (neg.f64 (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 3 binary64))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 3 binary64))) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (sin.f64 delta))

simplify516.0ms (2.8%)

Memory
26.1MiB live, 642.9MiB allocated
Algorithm
egg-herbie
Rules
11 480×lower-fma.f64
11 480×lower-fma.f32
6 704×lower-*.f64
6 704×lower-*.f32
4 004×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
05019810
115809624
244699575
081519321
Stop Event
iter limit
node limit
Counts
624 → 602
Calls
Call 1
Inputs
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 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) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) lambda1)) 1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (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) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (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) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (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) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (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) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (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) (+ 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) (+ 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) (+ 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) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (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) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (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) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (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) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (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) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (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) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (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) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (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) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (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) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (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) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (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) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (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) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
1
(+ 1 (* -1/2 (pow phi1 2)))
(+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))
(cos phi1)
(cos phi1)
(cos phi1)
(cos phi1)
(cos phi1)
(cos phi1)
(cos phi1)
(cos phi1)
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)
lambda1
lambda1
lambda1
lambda1
lambda1
lambda1
lambda1
lambda1
lambda1
lambda1
lambda1
lambda1
(/ 1 lambda1)
(/ 1 lambda1)
(/ 1 lambda1)
(/ 1 lambda1)
(/ 1 lambda1)
(/ 1 lambda1)
(/ 1 lambda1)
(/ 1 lambda1)
(/ 1 lambda1)
(/ 1 lambda1)
(/ 1 lambda1)
(/ 1 lambda1)
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)) lambda1)) 1)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (neg (+ delta (* -1 theta)))) (cos (- delta (* -1 theta))))) (cos delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (neg (+ delta (* -1 theta)))) (cos (- delta (* -1 theta))))) (cos delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (neg (+ delta (* -1 theta)))) (cos (- delta (* -1 theta))))) (cos delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (neg (+ delta (* -1 theta)))) (cos (- delta (* -1 theta))))) (cos delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (+ theta (* -1 delta))) (cos (- theta (* -1 delta))))) (cos delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (+ theta (* -1 delta))) (cos (- theta (* -1 delta))))) (cos delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (+ theta (* -1 delta))) (cos (- theta (* -1 delta))))) (cos delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (+ theta (* -1 delta))) (cos (- theta (* -1 delta))))) (cos delta)))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2 (* 1/2 (- (cos (neg (+ delta (* -1 theta)))) (cos (- delta (* -1 theta))))) (cos delta))
(atan2 (* 1/2 (- (cos (neg (+ delta (* -1 theta)))) (cos (- delta (* -1 theta))))) (cos delta))
(atan2 (* 1/2 (- (cos (neg (+ delta (* -1 theta)))) (cos (- delta (* -1 theta))))) (cos delta))
(atan2 (* 1/2 (- (cos (neg (+ delta (* -1 theta)))) (cos (- delta (* -1 theta))))) (cos delta))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2 (* 1/2 (- (cos (+ theta (* -1 delta))) (cos (- theta (* -1 delta))))) (cos delta))
(atan2 (* 1/2 (- (cos (+ theta (* -1 delta))) (cos (- theta (* -1 delta))))) (cos delta))
(atan2 (* 1/2 (- (cos (+ theta (* -1 delta))) (cos (- theta (* -1 delta))))) (cos delta))
(atan2 (* 1/2 (- (cos (+ theta (* -1 delta))) (cos (- theta (* -1 delta))))) (cos delta))
(- (cos (neg delta)) (cos delta))
(- (+ (cos (neg delta)) (* theta (- (sin delta) (sin (neg delta))))) (cos delta))
(- (+ (cos (neg delta)) (* theta (- (+ (sin delta) (* theta (- (* -1/2 (cos (neg delta))) (* -1/2 (cos delta))))) (sin (neg delta))))) (cos delta))
(- (+ (cos (neg delta)) (* theta (- (+ (sin delta) (* theta (- (+ (* -1/2 (cos (neg delta))) (* theta (- (* -1/6 (sin delta)) (* -1/6 (sin (neg delta)))))) (* -1/2 (cos delta))))) (sin (neg delta))))) (cos delta))
(- (cos (- theta delta)) (cos (+ delta theta)))
(- (cos (- theta delta)) (cos (+ delta theta)))
(- (cos (- theta delta)) (cos (+ delta theta)))
(- (cos (- theta delta)) (cos (+ delta theta)))
(- (cos (neg (+ delta (* -1 theta)))) (cos (- delta (* -1 theta))))
(- (cos (neg (+ delta (* -1 theta)))) (cos (- delta (* -1 theta))))
(- (cos (neg (+ delta (* -1 theta)))) (cos (- delta (* -1 theta))))
(- (cos (neg (+ delta (* -1 theta)))) (cos (- delta (* -1 theta))))
(* delta (- (sin theta) (* -1 (sin theta))))
(* delta (- (+ (sin theta) (* (pow delta 2) (- (* -1/6 (sin theta)) (* 1/6 (sin theta))))) (* -1 (sin theta))))
(* delta (- (+ (sin theta) (* (pow delta 2) (- (+ (* -1/6 (sin theta)) (* (pow delta 2) (- (* 1/120 (sin theta)) (* -1/120 (sin theta))))) (* 1/6 (sin theta))))) (* -1 (sin theta))))
(* delta (- (+ (sin theta) (* (pow delta 2) (- (+ (* -1/6 (sin theta)) (* (pow delta 2) (- (+ (* 1/120 (sin theta)) (* (pow delta 2) (- (* -1/5040 (sin theta)) (* 1/5040 (sin theta))))) (* -1/120 (sin theta))))) (* 1/6 (sin theta))))) (* -1 (sin theta))))
(- (cos (- theta delta)) (cos (+ delta theta)))
(- (cos (- theta delta)) (cos (+ delta theta)))
(- (cos (- theta delta)) (cos (+ delta theta)))
(- (cos (- theta delta)) (cos (+ delta theta)))
(- (cos (+ theta (* -1 delta))) (cos (- theta (* -1 delta))))
(- (cos (+ theta (* -1 delta))) (cos (- theta (* -1 delta))))
(- (cos (+ theta (* -1 delta))) (cos (- theta (* -1 delta))))
(- (cos (+ theta (* -1 delta))) (cos (- theta (* -1 delta))))
(cos (neg delta))
(+ (cos (neg delta)) (* -1 (* theta (sin (neg delta)))))
(+ (cos (neg delta)) (* theta (- (* -1/2 (* theta (cos (neg delta)))) (sin (neg delta)))))
(+ (cos (neg delta)) (* theta (- (* theta (+ (* -1/2 (cos (neg delta))) (* 1/6 (* theta (sin (neg delta)))))) (sin (neg delta)))))
(cos (- theta delta))
(cos (- theta delta))
(cos (- theta delta))
(cos (- theta delta))
(cos (neg (+ delta (* -1 theta))))
(cos (neg (+ delta (* -1 theta))))
(cos (neg (+ delta (* -1 theta))))
(cos (neg (+ delta (* -1 theta))))
(cos theta)
(+ (cos theta) (* delta (sin theta)))
(+ (cos theta) (* delta (- (* -1/2 (* delta (cos theta))) (* -1 (sin theta)))))
(+ (cos theta) (* delta (- (* delta (+ (* -1/2 (cos theta)) (* -1/6 (* delta (sin theta))))) (* -1 (sin theta)))))
(cos (- theta delta))
(cos (- theta delta))
(cos (- theta delta))
(cos (- theta delta))
(cos (+ theta (* -1 delta)))
(cos (+ theta (* -1 delta)))
(cos (+ theta (* -1 delta)))
(cos (+ theta (* -1 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(/ 1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ (* -1 (/ lambda1 (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) 2))) (/ 1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(+ (* lambda1 (- (/ lambda1 (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) 3)) (/ 1 (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) 2)))) (/ 1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(+ (* lambda1 (- (* lambda1 (+ (* -1 (/ lambda1 (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) 4))) (/ 1 (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) 3)))) (/ 1 (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) 2)))) (/ 1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 lambda1)
(/ (+ 1 (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1))) lambda1)
(/ (- (+ 1 (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1)) lambda1)
(/ (- (+ 1 (* -1 (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) 3) (pow lambda1 3)))) (+ (* -1 (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1))) lambda1)
(/ 1 lambda1)
(* -1 (/ (- (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1) 1) lambda1))
(* -1 (/ (- (* -1 (/ (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) 2) lambda1) (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))) lambda1)) 1) lambda1))
(* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) 3) lambda1) (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) 2)) lambda1)) (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))) lambda1)) 1) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
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)
1
(+ 1 (* -1 (pow phi1 2)))
(+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))
(* 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))
(* 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 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 (* (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)))
(* 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)))
(cos theta)
(+ (cos theta) (* -1 (* delta (sin theta))))
(+ (cos theta) (* delta (- (* -1/2 (* delta (cos theta))) (sin theta))))
(+ (cos theta) (* delta (- (* delta (+ (* -1/2 (cos theta)) (* 1/6 (* delta (sin theta))))) (sin theta))))
(cos (+ delta theta))
(cos (+ delta theta))
(cos (+ delta theta))
(cos (+ delta theta))
(cos (- theta (* -1 delta)))
(cos (- theta (* -1 delta)))
(cos (- theta (* -1 delta)))
(cos (- theta (* -1 delta)))
(cos delta)
(+ (cos delta) (* -1 (* theta (sin delta))))
(+ (cos delta) (* theta (- (* -1/2 (* theta (cos delta))) (sin delta))))
(+ (cos delta) (* theta (- (* theta (+ (* -1/2 (cos delta)) (* 1/6 (* theta (sin delta))))) (sin delta))))
(cos (+ delta theta))
(cos (+ delta theta))
(cos (+ delta theta))
(cos (+ delta theta))
(cos (- delta (* -1 theta)))
(cos (- delta (* -1 theta)))
(cos (- delta (* -1 theta)))
(cos (- delta (* -1 theta)))
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)))
(pow (cos phi1) 2)
(pow (cos phi1) 2)
(pow (cos phi1) 2)
(pow (cos phi1) 2)
(pow (cos phi1) 2)
(pow (cos phi1) 2)
(pow (cos phi1) 2)
(pow (cos phi1) 2)
1
(+ 1 (* -1 (pow phi1 2)))
(+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(+ 1/2 (* 1/2 (cos (* -2 phi1))))
(+ 1/2 (* 1/2 (cos (* -2 phi1))))
(+ 1/2 (* 1/2 (cos (* -2 phi1))))
(+ 1/2 (* 1/2 (cos (* -2 phi1))))
(+ 1/2 (* 1/2 (cos (* -2 phi1))))
(+ 1/2 (* 1/2 (cos (* -2 phi1))))
(+ 1/2 (* 1/2 (cos (* -2 phi1))))
(+ 1/2 (* 1/2 (cos (* -2 phi1))))
(* -1 (* delta (sin phi1)))
(* delta (+ (* -1 (sin phi1)) (* 1/6 (* (pow delta 2) (sin phi1)))))
(* delta (+ (* -1 (sin phi1)) (* (pow delta 2) (+ (* -1/120 (* (pow delta 2) (sin phi1))) (* 1/6 (sin phi1))))))
(* delta (+ (* -1 (sin phi1)) (* (pow delta 2) (+ (* 1/6 (sin phi1)) (* (pow delta 2) (+ (* -1/120 (sin phi1)) (* 1/5040 (* (pow delta 2) (sin phi1)))))))))
(* -1 (* (sin delta) (sin phi1)))
(* -1 (* (sin delta) (sin phi1)))
(* -1 (* (sin delta) (sin phi1)))
(* -1 (* (sin delta) (sin phi1)))
(* -1 (* (sin delta) (sin phi1)))
(* -1 (* (sin delta) (sin phi1)))
(* -1 (* (sin delta) (sin phi1)))
(* -1 (* (sin delta) (sin phi1)))
(* -1 (* phi1 (sin delta)))
(* phi1 (+ (* -1 (sin delta)) (* 1/6 (* (pow phi1 2) (sin delta)))))
(* phi1 (+ (* -1 (sin delta)) (* (pow phi1 2) (+ (* -1/120 (* (pow phi1 2) (sin delta))) (* 1/6 (sin delta))))))
(* phi1 (+ (* -1 (sin delta)) (* (pow phi1 2) (+ (* 1/6 (sin delta)) (* (pow phi1 2) (+ (* -1/120 (sin delta)) (* 1/5040 (* (pow phi1 2) (sin delta)))))))))
(* -1 (* (sin delta) (sin phi1)))
(* -1 (* (sin delta) (sin phi1)))
(* -1 (* (sin delta) (sin phi1)))
(* -1 (* (sin delta) (sin phi1)))
(* -1 (* (sin delta) (sin phi1)))
(* -1 (* (sin delta) (sin phi1)))
(* -1 (* (sin delta) (sin phi1)))
(* -1 (* (sin delta) (sin phi1)))
Outputs
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (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 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (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 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (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 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (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 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (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 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (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 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow phi1 2)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64))
(+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))
(fma.f64 (*.f64 phi1 phi1) (fma.f64 phi1 (*.f64 phi1 #s(literal 1/24 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))
(fma.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(cos phi1)
(cos.f64 phi1)
(cos phi1)
(cos.f64 phi1)
(cos phi1)
(cos.f64 phi1)
(cos phi1)
(cos.f64 phi1)
(cos phi1)
(cos.f64 phi1)
(cos phi1)
(cos.f64 phi1)
(cos phi1)
(cos.f64 phi1)
(cos phi1)
(cos.f64 phi1)
delta
(* delta (+ 1 (* -1/6 (pow delta 2))))
(*.f64 delta (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6))))
(*.f64 delta (fma.f64 delta (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) #s(literal 1 binary64)))
(* delta (+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/120 (* -1/5040 (pow delta 2)))) 1/6))))
(*.f64 delta (fma.f64 (*.f64 delta delta) (fma.f64 delta (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(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)
lambda1
lambda1
lambda1
lambda1
lambda1
lambda1
lambda1
lambda1
lambda1
lambda1
lambda1
lambda1
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)) lambda1)) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)) lambda1)) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)) lambda1)) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)) lambda1))))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (neg (+ delta (* -1 theta)))) (cos (- delta (* -1 theta))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (neg (+ delta (* -1 theta)))) (cos (- delta (* -1 theta))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (neg (+ delta (* -1 theta)))) (cos (- delta (* -1 theta))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (neg (+ delta (* -1 theta)))) (cos (- delta (* -1 theta))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (+ theta (* -1 delta))) (cos (- theta (* -1 delta))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (+ theta (* -1 delta))) (cos (- theta (* -1 delta))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (+ theta (* -1 delta))) (cos (- theta (* -1 delta))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)))
(+ lambda1 (atan2 (* 1/2 (- (cos (+ theta (* -1 delta))) (cos (- theta (* -1 delta))))) (cos delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta)))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta))
(atan2 (* 1/2 (- (cos (neg (+ delta (* -1 theta)))) (cos (- delta (* -1 theta))))) (cos delta))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta))
(atan2 (* 1/2 (- (cos (neg (+ delta (* -1 theta)))) (cos (- delta (* -1 theta))))) (cos delta))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta))
(atan2 (* 1/2 (- (cos (neg (+ delta (* -1 theta)))) (cos (- delta (* -1 theta))))) (cos delta))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta))
(atan2 (* 1/2 (- (cos (neg (+ delta (* -1 theta)))) (cos (- delta (* -1 theta))))) (cos delta))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta))
(atan2 (* 1/2 (- (cos (- theta delta)) (cos (+ delta theta)))) (cos delta))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta))
(atan2 (* 1/2 (- (cos (+ theta (* -1 delta))) (cos (- theta (* -1 delta))))) (cos delta))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta))
(atan2 (* 1/2 (- (cos (+ theta (* -1 delta))) (cos (- theta (* -1 delta))))) (cos delta))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta))
(atan2 (* 1/2 (- (cos (+ theta (* -1 delta))) (cos (- theta (* -1 delta))))) (cos delta))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta))
(atan2 (* 1/2 (- (cos (+ theta (* -1 delta))) (cos (- theta (* -1 delta))))) (cos delta))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (cos.f64 delta))
(- (cos (neg delta)) (cos delta))
#s(literal 0 binary64)
(- (+ (cos (neg delta)) (* theta (- (sin delta) (sin (neg delta))))) (cos delta))
(fma.f64 theta (+.f64 (sin.f64 delta) (sin.f64 delta)) #s(literal 0 binary64))
(- (+ (cos (neg delta)) (* theta (- (+ (sin delta) (* theta (- (* -1/2 (cos (neg delta))) (* -1/2 (cos delta))))) (sin (neg delta))))) (cos delta))
(fma.f64 theta (+.f64 (sin.f64 delta) (sin.f64 delta)) #s(literal 0 binary64))
(- (+ (cos (neg delta)) (* theta (- (+ (sin delta) (* theta (- (+ (* -1/2 (cos (neg delta))) (* theta (- (* -1/6 (sin delta)) (* -1/6 (sin (neg delta)))))) (* -1/2 (cos delta))))) (sin (neg delta))))) (cos delta))
(fma.f64 theta (+.f64 (sin.f64 delta) (fma.f64 theta (fma.f64 (*.f64 theta #s(literal -1/6 binary64)) (+.f64 (sin.f64 delta) (sin.f64 delta)) #s(literal 0 binary64)) (sin.f64 delta))) #s(literal 0 binary64))
(- (cos (- theta delta)) (cos (+ delta theta)))
(-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))
(- (cos (- theta delta)) (cos (+ delta theta)))
(-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))
(- (cos (- theta delta)) (cos (+ delta theta)))
(-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))
(- (cos (- theta delta)) (cos (+ delta theta)))
(-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))
(- (cos (neg (+ delta (* -1 theta)))) (cos (- delta (* -1 theta))))
(-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))
(- (cos (neg (+ delta (* -1 theta)))) (cos (- delta (* -1 theta))))
(-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))
(- (cos (neg (+ delta (* -1 theta)))) (cos (- delta (* -1 theta))))
(-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))
(- (cos (neg (+ delta (* -1 theta)))) (cos (- delta (* -1 theta))))
(-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))
(* delta (- (sin theta) (* -1 (sin theta))))
(*.f64 delta (*.f64 #s(literal 2 binary64) (sin.f64 theta)))
(* delta (- (+ (sin theta) (* (pow delta 2) (- (* -1/6 (sin theta)) (* 1/6 (sin theta))))) (* -1 (sin theta))))
(*.f64 delta (fma.f64 delta (*.f64 delta (*.f64 (sin.f64 theta) #s(literal -1/3 binary64))) (*.f64 #s(literal 2 binary64) (sin.f64 theta))))
(* delta (- (+ (sin theta) (* (pow delta 2) (- (+ (* -1/6 (sin theta)) (* (pow delta 2) (- (* 1/120 (sin theta)) (* -1/120 (sin theta))))) (* 1/6 (sin theta))))) (* -1 (sin theta))))
(*.f64 delta (fma.f64 (*.f64 delta delta) (fma.f64 delta (*.f64 delta (*.f64 (sin.f64 theta) #s(literal 1/60 binary64))) (*.f64 (sin.f64 theta) #s(literal -1/3 binary64))) (*.f64 #s(literal 2 binary64) (sin.f64 theta))))
(* delta (- (+ (sin theta) (* (pow delta 2) (- (+ (* -1/6 (sin theta)) (* (pow delta 2) (- (+ (* 1/120 (sin theta)) (* (pow delta 2) (- (* -1/5040 (sin theta)) (* 1/5040 (sin theta))))) (* -1/120 (sin theta))))) (* 1/6 (sin theta))))) (* -1 (sin theta))))
(*.f64 delta (fma.f64 (*.f64 delta delta) (fma.f64 (*.f64 delta delta) (fma.f64 delta (*.f64 delta (*.f64 (sin.f64 theta) #s(literal -1/2520 binary64))) (*.f64 (sin.f64 theta) #s(literal 1/60 binary64))) (*.f64 (sin.f64 theta) #s(literal -1/3 binary64))) (*.f64 #s(literal 2 binary64) (sin.f64 theta))))
(- (cos (- theta delta)) (cos (+ delta theta)))
(-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))
(- (cos (- theta delta)) (cos (+ delta theta)))
(-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))
(- (cos (- theta delta)) (cos (+ delta theta)))
(-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))
(- (cos (- theta delta)) (cos (+ delta theta)))
(-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))
(- (cos (+ theta (* -1 delta))) (cos (- theta (* -1 delta))))
(-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))
(- (cos (+ theta (* -1 delta))) (cos (- theta (* -1 delta))))
(-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))
(- (cos (+ theta (* -1 delta))) (cos (- theta (* -1 delta))))
(-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))
(- (cos (+ theta (* -1 delta))) (cos (- theta (* -1 delta))))
(-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))
(cos (neg delta))
(cos.f64 delta)
(+ (cos (neg delta)) (* -1 (* theta (sin (neg delta)))))
(fma.f64 (sin.f64 delta) theta (cos.f64 delta))
(+ (cos (neg delta)) (* theta (- (* -1/2 (* theta (cos (neg delta)))) (sin (neg delta)))))
(fma.f64 theta (fma.f64 #s(literal -1/2 binary64) (*.f64 theta (cos.f64 delta)) (sin.f64 delta)) (cos.f64 delta))
(+ (cos (neg delta)) (* theta (- (* theta (+ (* -1/2 (cos (neg delta))) (* 1/6 (* theta (sin (neg delta)))))) (sin (neg delta)))))
(fma.f64 theta (fma.f64 (cos.f64 delta) (*.f64 theta #s(literal -1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta))) (cos.f64 delta))
(cos (- theta delta))
(cos.f64 (-.f64 delta theta))
(cos (- theta delta))
(cos.f64 (-.f64 delta theta))
(cos (- theta delta))
(cos.f64 (-.f64 delta theta))
(cos (- theta delta))
(cos.f64 (-.f64 delta theta))
(cos (neg (+ delta (* -1 theta))))
(cos.f64 (-.f64 delta theta))
(cos (neg (+ delta (* -1 theta))))
(cos.f64 (-.f64 delta theta))
(cos (neg (+ delta (* -1 theta))))
(cos.f64 (-.f64 delta theta))
(cos (neg (+ delta (* -1 theta))))
(cos.f64 (-.f64 delta theta))
(cos theta)
(cos.f64 theta)
(+ (cos theta) (* delta (sin theta)))
(fma.f64 delta (sin.f64 theta) (cos.f64 theta))
(+ (cos theta) (* delta (- (* -1/2 (* delta (cos theta))) (* -1 (sin theta)))))
(fma.f64 delta (fma.f64 delta (*.f64 (cos.f64 theta) #s(literal -1/2 binary64)) (sin.f64 theta)) (cos.f64 theta))
(+ (cos theta) (* delta (- (* delta (+ (* -1/2 (cos theta)) (* -1/6 (* delta (sin theta))))) (* -1 (sin theta)))))
(fma.f64 delta (fma.f64 delta (*.f64 (cos.f64 theta) #s(literal -1/2 binary64)) (*.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)) (sin.f64 theta))) (cos.f64 theta))
(cos (- theta delta))
(cos.f64 (-.f64 delta theta))
(cos (- theta delta))
(cos.f64 (-.f64 delta theta))
(cos (- theta delta))
(cos.f64 (-.f64 delta theta))
(cos (- theta delta))
(cos.f64 (-.f64 delta theta))
(cos (+ theta (* -1 delta)))
(cos.f64 (-.f64 delta theta))
(cos (+ theta (* -1 delta)))
(cos.f64 (-.f64 delta theta))
(cos (+ theta (* -1 delta)))
(cos.f64 (-.f64 delta theta))
(cos (+ theta (* -1 delta)))
(cos.f64 (-.f64 delta theta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1)) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1)) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1)) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) lambda1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(/ 1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(/.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ (* -1 (/ lambda1 (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) 2))) (/ 1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(-.f64 (/.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (/.f64 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #s(literal 2 binary64))))
(+ (* lambda1 (- (/ lambda1 (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) 3)) (/ 1 (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) 2)))) (/ 1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(fma.f64 lambda1 (+.f64 (/.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (/.f64 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+ (* lambda1 (- (* lambda1 (+ (* -1 (/ lambda1 (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) 4))) (/ 1 (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) 3)))) (/ 1 (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) 2)))) (/ 1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(fma.f64 lambda1 (fma.f64 lambda1 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #s(literal 3 binary64))) (/.f64 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #s(literal 4 binary64)))) (/.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ (+ 1 (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1))) lambda1)
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) lambda1)) lambda1)
(/ (- (+ 1 (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1)) lambda1)
(/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #s(literal 2 binary64)) lambda1) (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) lambda1)) lambda1)
(/ (- (+ 1 (* -1 (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) 3) (pow lambda1 3)))) (+ (* -1 (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1))) lambda1)
(/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) lambda1) #s(literal 3 binary64))) (/.f64 (-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #s(literal 2 binary64)) lambda1) (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) lambda1)) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(* -1 (/ (- (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1) 1) lambda1))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) lambda1)) lambda1)
(* -1 (/ (- (* -1 (/ (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) 2) lambda1) (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))) lambda1)) 1) lambda1))
(/.f64 (-.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #s(literal 2 binary64)) lambda1) (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (/ (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) 3) lambda1) (pow (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) 2)) lambda1)) (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))) lambda1)) 1) lambda1))
(/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (/.f64 (-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #s(literal 3 binary64)) lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) lambda1)) lambda1)) lambda1)
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/ 1 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))))
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1)) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1)) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)) lambda1)) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) lambda1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (pow (cos phi1) 2))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* 1/2 (cos (* -2 phi1))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
theta
(* theta (+ 1 (* -1/6 (pow theta 2))))
(*.f64 theta (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)))
(* theta (+ 1 (* (pow theta 2) (- (* 1/120 (pow theta 2)) 1/6))))
(*.f64 theta (fma.f64 theta (*.f64 theta (fma.f64 theta (*.f64 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))))
(*.f64 theta (fma.f64 (*.f64 theta theta) (fma.f64 (*.f64 theta theta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(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)
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 phi1 (*.f64 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 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64)) #s(literal -1 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 (sin phi1))
(*.f64 delta (sin.f64 phi1))
(* delta (+ (sin phi1) (* -1/6 (* (pow delta 2) (sin phi1)))))
(*.f64 delta (*.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #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 (*.f64 delta delta) #s(literal 1/120 binary64) #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 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)) (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (*.f64 delta delta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (*.f64 (*.f64 delta delta) (*.f64 delta delta)))))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(* phi1 (sin delta))
(*.f64 phi1 (sin.f64 delta))
(* phi1 (+ (sin delta) (* -1/6 (* (pow phi1 2) (sin delta)))))
(*.f64 phi1 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #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 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #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 delta) (sin.f64 phi1))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(* 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 delta) (*.f64 (sin.f64 theta) (fma.f64 (*.f64 delta 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 (sin.f64 theta) (fma.f64 (*.f64 delta delta) #s(literal -1/5040 binary64) #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))
(* theta (sin delta))
(fma.f64 (sin.f64 delta) theta #s(literal 0 binary64))
(* 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 theta (*.f64 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 #s(literal -1/5040 binary64) (*.f64 theta theta) #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 (* (cos phi1) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 delta (sin.f64 phi1)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin phi1)))) (* (cos phi1) (sin phi1))))
(*.f64 delta (*.f64 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #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 (*.f64 delta delta) #s(literal 1/120 binary64) #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 (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 (*.f64 delta delta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (*.f64 (*.f64 delta delta) (*.f64 delta delta)))))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* 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 phi1 (*.f64 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 (*.f64 phi1 phi1) (fma.f64 (sin.f64 delta) #s(literal 2/15 binary64) (*.f64 (*.f64 phi1 phi1) (fma.f64 (sin.f64 delta) #s(literal -1/144 binary64) (*.f64 (sin.f64 delta) #s(literal -29/5040 binary64))))) (*.f64 (sin.f64 delta) #s(literal -2/3 binary64))) (sin.f64 delta)))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(cos theta)
(cos.f64 theta)
(+ (cos theta) (* -1 (* delta (sin theta))))
(-.f64 (cos.f64 theta) (*.f64 delta (sin.f64 theta)))
(+ (cos theta) (* delta (- (* -1/2 (* delta (cos theta))) (sin theta))))
(fma.f64 delta (-.f64 (*.f64 delta (*.f64 (cos.f64 theta) #s(literal -1/2 binary64))) (sin.f64 theta)) (cos.f64 theta))
(+ (cos theta) (* delta (- (* delta (+ (* -1/2 (cos theta)) (* 1/6 (* delta (sin theta))))) (sin theta))))
(fma.f64 delta (fma.f64 delta (fma.f64 delta (*.f64 (sin.f64 theta) #s(literal 1/6 binary64)) (*.f64 (cos.f64 theta) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 theta))) (cos.f64 theta))
(cos (+ delta theta))
(cos.f64 (+.f64 delta theta))
(cos (+ delta theta))
(cos.f64 (+.f64 delta theta))
(cos (+ delta theta))
(cos.f64 (+.f64 delta theta))
(cos (+ delta theta))
(cos.f64 (+.f64 delta theta))
(cos (- theta (* -1 delta)))
(cos.f64 (+.f64 delta theta))
(cos (- theta (* -1 delta)))
(cos.f64 (+.f64 delta theta))
(cos (- theta (* -1 delta)))
(cos.f64 (+.f64 delta theta))
(cos (- theta (* -1 delta)))
(cos.f64 (+.f64 delta theta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* theta (sin delta))))
(fma.f64 theta (-.f64 #s(literal 0 binary64) (sin.f64 delta)) (cos.f64 delta))
(+ (cos delta) (* theta (- (* -1/2 (* theta (cos delta))) (sin delta))))
(fma.f64 theta (fma.f64 #s(literal -1/2 binary64) (*.f64 theta (cos.f64 delta)) (-.f64 #s(literal 0 binary64) (sin.f64 delta))) (cos.f64 delta))
(+ (cos delta) (* theta (- (* theta (+ (* -1/2 (cos delta)) (* 1/6 (* theta (sin delta))))) (sin delta))))
(fma.f64 theta (-.f64 (*.f64 theta (fma.f64 (cos.f64 delta) #s(literal -1/2 binary64) (*.f64 theta (*.f64 (sin.f64 delta) #s(literal 1/6 binary64))))) (sin.f64 delta)) (cos.f64 delta))
(cos (+ delta theta))
(cos.f64 (+.f64 delta theta))
(cos (+ delta theta))
(cos.f64 (+.f64 delta theta))
(cos (+ delta theta))
(cos.f64 (+.f64 delta theta))
(cos (+ delta theta))
(cos.f64 (+.f64 delta theta))
(cos (- delta (* -1 theta)))
(cos.f64 (+.f64 delta theta))
(cos (- delta (* -1 theta)))
(cos.f64 (+.f64 delta theta))
(cos (- delta (* -1 theta)))
(cos.f64 (+.f64 delta theta))
(cos (- delta (* -1 theta)))
(cos.f64 (+.f64 delta theta))
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 phi1 (*.f64 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 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64)) #s(literal -1 binary64)) #s(literal 1 binary64))
(pow (cos phi1) 2)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow (cos phi1) 2)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow (cos phi1) 2)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow (cos phi1) 2)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow (cos phi1) 2)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow (cos phi1) 2)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow (cos phi1) 2)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow (cos phi1) 2)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
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 phi1 (*.f64 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 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64)) #s(literal -1 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 (* -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 (* delta (sin phi1)))
(*.f64 delta (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(* delta (+ (* -1 (sin phi1)) (* 1/6 (* (pow delta 2) (sin phi1)))))
(*.f64 delta (*.f64 (sin.f64 phi1) (fma.f64 (*.f64 delta delta) #s(literal 1/6 binary64) #s(literal -1 binary64))))
(* delta (+ (* -1 (sin phi1)) (* (pow delta 2) (+ (* -1/120 (* (pow delta 2) (sin phi1))) (* 1/6 (sin phi1))))))
(*.f64 delta (fma.f64 (*.f64 delta delta) (*.f64 (sin.f64 phi1) (fma.f64 (*.f64 delta delta) #s(literal -1/120 binary64) #s(literal 1/6 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))))
(* delta (+ (* -1 (sin phi1)) (* (pow delta 2) (+ (* 1/6 (sin phi1)) (* (pow delta 2) (+ (* -1/120 (sin phi1)) (* 1/5040 (* (pow delta 2) (sin phi1)))))))))
(*.f64 delta (fma.f64 (sin.f64 phi1) (fma.f64 (*.f64 delta delta) #s(literal 1/6 binary64) #s(literal -1 binary64)) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 delta delta) (*.f64 (sin.f64 phi1) (fma.f64 (*.f64 delta delta) #s(literal 1/5040 binary64) #s(literal -1/120 binary64)))))))
(* -1 (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(* -1 (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(* -1 (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(* -1 (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(* -1 (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(* -1 (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(* -1 (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(* -1 (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(* -1 (* phi1 (sin delta)))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (sin.f64 delta)))
(* phi1 (+ (* -1 (sin delta)) (* 1/6 (* (pow phi1 2) (sin delta)))))
(*.f64 phi1 (*.f64 (sin.f64 delta) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/6 binary64) #s(literal -1 binary64))))
(* phi1 (+ (* -1 (sin delta)) (* (pow phi1 2) (+ (* -1/120 (* (pow phi1 2) (sin delta))) (* 1/6 (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))) (-.f64 #s(literal 0 binary64) (sin.f64 delta))))
(* phi1 (+ (* -1 (sin delta)) (* (pow phi1 2) (+ (* 1/6 (sin delta)) (* (pow phi1 2) (+ (* -1/120 (sin delta)) (* 1/5040 (* (pow phi1 2) (sin delta)))))))))
(*.f64 phi1 (fma.f64 (sin.f64 delta) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/6 binary64) #s(literal -1 binary64)) (*.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)))))
(* -1 (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(* -1 (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(* -1 (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(* -1 (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(* -1 (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(* -1 (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(* -1 (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(* -1 (* (sin delta) (sin phi1)))
(*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))

eval200.0ms (1.1%)

Memory
1.6MiB live, 382.9MiB allocated
Compiler

Compiled 45 793 to 3 088 computations (93.3% saved)

prune385.0ms (2.1%)

Memory
-9.1MiB live, 598.3MiB allocated
Pruning

65 alts after pruning (63 fresh and 2 done)

PrunedKeptTotal
New1 392351 427
Fresh112839
Picked415
Done011
Total1 407651 472
Accuracy
100.0%
Counts
1 472 → 65
Alt Table
Click to see full alt table
StatusAccuracyProgram
41.3%
(pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) #s(literal 2 binary64))
35.8%
(pow.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) #s(literal 2 binary64))
20.8%
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda1)) #s(literal -1/2 binary64))
29.0%
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
15.5%
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
14.3%
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
18.4%
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
15.5%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 theta)) (sin.f64 delta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
20.2%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
20.5%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
38.0%
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1)))
35.8%
(/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal 2 binary64)))
20.4%
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))
83.9%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1)))
71.2%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (fma.f64 (sin.f64 delta) theta #s(literal 0 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
95.5%
(/.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 (sin.f64 delta) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))
41.2%
(/.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))) (-.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))))))
73.4%
(/.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))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))))
80.7%
(/.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))) #s(literal 1 binary64)))))
80.7%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 delta (sin.f64 theta))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
72.2%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) lambda1))
79.1%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (fma.f64 (sin.f64 delta) theta #s(literal 0 binary64))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1)
84.0%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1)
99.8%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) lambda1)
93.6%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 1 binary64))))) lambda1)
99.9%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1)
99.8%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (exp.f64 (*.f64 (log.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1)
94.1%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) lambda1)
89.0%
(+.f64 (atan2.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1)
75.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (-.f64 (fma.f64 (sin.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) (cos.f64 theta))) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta)))
67.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (-.f64 (fma.f64 (sin.f64 delta) theta (cos.f64 delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta)))
71.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (-.f64 (fma.f64 delta (sin.f64 theta) (cos.f64 theta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta)))
75.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (fma.f64 (cos.f64 theta) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 theta)) (sin.f64 delta)))) #s(literal 1/2 binary64)) (cos.f64 delta)))
66.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 delta)) #s(literal 1/2 binary64)) (cos.f64 delta)))
71.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (-.f64 (cos.f64 theta) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta)))
66.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (-.f64 (cos.f64 delta) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta)))
77.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (-.f64 theta (+.f64 delta (+.f64 delta theta))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (+.f64 (+.f64 (-.f64 theta delta) delta) theta) #s(literal 1/2 binary64)))) #s(literal -2 binary64)) #s(literal 1/2 binary64)) (cos.f64 delta)))
94.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))
85.2%
(+.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 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 phi1)))))
95.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))
85.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))))
89.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta))) (sin.f64 phi1)) #s(literal 2 binary64)))))
90.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))))
89.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
76.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 phi1)) (cos.f64 delta)))
90.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta)) (cos.f64 delta)))
77.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
72.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))))
78.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))) (sin.f64 theta)) (cos.f64 delta)))
78.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 phi1)) (cos.f64 delta)))
81.8%
(+.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))))
88.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
88.3%
(+.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))))))))
88.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
80.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64)))
73.5%
(+.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.2%
(+.f64 lambda1 (atan2.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 delta)))
78.5%
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (cos.f64 delta)))
78.3%
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
74.7%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 0 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
41.2%
(*.f64 (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
45.6%
(*.f64 (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)) (*.f64 lambda1 (*.f64 lambda1 lambda1)))) (fma.f64 lambda1 (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))))
53.7%
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))))
32.9%
(exp.f64 (log.f64 lambda1))
72.3%
lambda1
Compiler

Compiled 5 548 to 1 724 computations (68.9% saved)

regimes315.0ms (1.7%)

Memory
25.7MiB live, 422.2MiB allocated
Counts
118 → 1
Calls
Call 1
Inputs
lambda1
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) lambda1))
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda1)) #s(literal -1/2 binary64))
(exp.f64 (log.f64 lambda1))
(pow.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) #s(literal 2 binary64))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 0 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal 2 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (sin.f64 delta)) (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 (*.f64 delta (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))) (sin.f64 theta)) (cos.f64 delta)))
(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 (sin.f64 delta) theta) (cos.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (-.f64 (cos.f64 delta) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (-.f64 (cos.f64 theta) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 delta)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(+.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 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (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))) #s(literal 1 binary64)))))
(/.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))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (-.f64 theta (+.f64 delta (+.f64 delta theta))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (+.f64 (+.f64 (-.f64 theta delta) delta) theta) #s(literal 1/2 binary64)))) #s(literal -2 binary64)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1))))) (cos.f64 delta)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (-.f64 (fma.f64 delta (sin.f64 theta) (cos.f64 theta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (-.f64 (fma.f64 (sin.f64 delta) theta (cos.f64 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 (cos.f64 delta) (*.f64 phi1 phi1))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1)
(+.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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 delta (sin.f64 theta))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (fma.f64 (sin.f64 delta) theta #s(literal 0 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1)))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.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)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) lambda1)
(/.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))) (pow.f64 (cos.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) (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 delta) (sin.f64 phi1)))))
(pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(+.f64 lambda1 (atan2.f64 (*.f64 (-.f64 (fma.f64 (sin.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) (cos.f64 theta))) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (fma.f64 (cos.f64 theta) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 theta)) (sin.f64 delta)))) #s(literal 1/2 binary64)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 phi1 (-.f64 #s(literal 0 binary64) phi1) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (cos.f64 theta)))))))
(/.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))) (-.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 phi1 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 phi1 (cos.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 delta (cos.f64 phi1)) (sin.f64 phi1)) #s(literal 1 binary64))))
(+.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 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta))) (sin.f64 phi1)) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 theta)) (sin.f64 delta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (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 (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 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64))))
(+.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 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))))
(+.f64 (atan2.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 1 binary64))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (fma.f64 (sin.f64 delta) theta #s(literal 0 binary64))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.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 (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)) (-.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1)
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (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)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(+.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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (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 (sin.f64 delta) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 0 binary64) (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) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) 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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 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 #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 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)))))
(fma.f64 lambda1 (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
(/.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)))) (-.f64 #s(literal 0 binary64) (sin.f64 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) (fma.f64 (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 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))) lambda1) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (exp.f64 (*.f64 (log.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))) #s(literal -1 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)))))))))
(pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (*.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) lambda1))))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1)))
(*.f64 (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(+.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 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)) lambda1) (*.f64 lambda1 lambda1)))
(+.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)))) (-.f64 #s(literal 0 binary64) (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 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (-.f64 #s(literal 0 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 #s(literal 0 binary64) (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))))
(*.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)))) (-.f64 #s(literal 0 binary64) (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))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) lambda1)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 2 binary64))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.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 (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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (+.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)))))
(fma.f64 (sqrt.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) (sqrt.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) lambda1)
(*.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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1)))
(*.f64 (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.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 (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))
(/.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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (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)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))))))
(*.f64 (/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)) (*.f64 lambda1 (*.f64 lambda1 lambda1)))) (fma.f64 lambda1 (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta)))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.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)))))))))
Outputs
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1)
Calls

7 calls:

59.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))))))))
58.0ms
lambda1
47.0ms
phi1
44.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)))))))))
40.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)

regimes204.0ms (1.1%)

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

7 calls:

46.0ms
lambda1
33.0ms
phi2
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
delta
25.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
99.8%1lambda1
99.8%1phi1
99.8%1phi2
99.8%1delta
99.8%1theta
99.8%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
99.8%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes173.0ms (0.9%)

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

7 calls:

34.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))))))))
27.0ms
theta
24.0ms
lambda1
22.0ms
phi1
21.0ms
phi2
Results
AccuracySegmentsBranch
99.8%1lambda1
99.8%1phi1
99.8%1phi2
99.8%1delta
99.8%1theta
99.8%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
99.8%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes154.0ms (0.8%)

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

7 calls:

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

Compiled 104 to 70 computations (32.7% saved)

regimes138.0ms (0.8%)

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

7 calls:

29.0ms
delta
27.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))))))))
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)))))))))
15.0ms
lambda1
14.0ms
phi2
Results
AccuracySegmentsBranch
90.3%1lambda1
90.3%1phi2
90.3%1theta
93.5%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)))))))))
94.2%3(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
90.3%1phi1
93.7%3delta
Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes20.0ms (0.1%)

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

1 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))))))))
Results
AccuracySegmentsBranch
94.1%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 36 to 22 computations (38.9% saved)

regimes43.0ms (0.2%)

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

4 calls:

11.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
11.0ms
delta
10.0ms
lambda1
9.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
90.3%1lambda1
90.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)))))))))
90.3%1delta
90.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 86 to 55 computations (36% saved)

regimes66.0ms (0.4%)

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

7 calls:

11.0ms
lambda1
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
9.0ms
phi1
8.0ms
theta
Results
AccuracySegmentsBranch
88.2%1phi1
88.2%1phi2
88.2%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)))))))))
88.2%1delta
88.2%1theta
88.2%1lambda1
88.2%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)

regimes41.0ms (0.2%)

Memory
-10.9MiB live, 106.9MiB allocated
Counts
15 → 2
Calls
Call 1
Inputs
lambda1
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) lambda1))
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda1)) #s(literal -1/2 binary64))
(exp.f64 (log.f64 lambda1))
(pow.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) #s(literal 2 binary64))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 0 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal 2 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (sin.f64 delta)) (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 (*.f64 delta (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))) (sin.f64 theta)) (cos.f64 delta)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta))
Outputs
(+.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)))
Calls

7 calls:

8.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
6.0ms
phi1
5.0ms
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
5.0ms
theta
5.0ms
delta
Results
AccuracySegmentsBranch
81.8%1phi2
81.8%1lambda1
81.8%1phi1
83.5%2delta
81.8%1theta
86.6%4(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 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.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)

regimes10.0ms (0.1%)

Memory
26.7MiB live, 26.7MiB allocated
Counts
12 → 2
Calls
Call 1
Inputs
lambda1
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) lambda1))
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda1)) #s(literal -1/2 binary64))
(exp.f64 (log.f64 lambda1))
(pow.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) #s(literal 2 binary64))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 0 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal 2 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (sin.f64 delta)) (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))))
Outputs
(+.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 (sin.f64 delta)) (cos.f64 delta)))
Calls

2 calls:

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

Compiled 44 to 28 computations (36.4% saved)

regimes49.0ms (0.3%)

Memory
-31.2MiB live, 81.3MiB allocated
Counts
11 → 3
Calls
Call 1
Inputs
lambda1
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) lambda1))
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda1)) #s(literal -1/2 binary64))
(exp.f64 (log.f64 lambda1))
(pow.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) #s(literal 2 binary64))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 0 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal 2 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64)))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 0 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
Calls

7 calls:

23.0ms
phi2
5.0ms
phi1
4.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)))))))))
4.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))))))))
4.0ms
lambda1
Results
AccuracySegmentsBranch
80.0%1lambda1
84.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)))))))))
80.0%1phi2
84.5%3theta
84.9%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))))))))
80.0%1phi1
84.0%3delta
Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes14.0ms (0.1%)

Memory
-6.1MiB live, 32.3MiB allocated
Counts
10 → 3
Calls
Call 1
Inputs
lambda1
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) lambda1))
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda1)) #s(literal -1/2 binary64))
(exp.f64 (log.f64 lambda1))
(pow.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) #s(literal 2 binary64))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 0 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal 2 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 delta)))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
Calls

3 calls:

5.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
4.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))))))))
4.0ms
theta
Results
AccuracySegmentsBranch
84.1%3theta
81.1%2(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
80.6%2(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
Compiler

Compiled 80 to 50 computations (37.5% saved)

regimes23.0ms (0.1%)

Memory
13.8MiB live, 52.3MiB allocated
Counts
9 → 2
Calls
Call 1
Inputs
lambda1
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) lambda1))
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda1)) #s(literal -1/2 binary64))
(exp.f64 (log.f64 lambda1))
(pow.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) #s(literal 2 binary64))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 0 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal 2 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 0 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
Calls

6 calls:

5.0ms
phi1
4.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
theta
3.0ms
phi2
3.0ms
delta
Results
AccuracySegmentsBranch
81.1%2(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
78.3%1lambda1
78.3%1phi2
78.3%1phi1
80.1%2delta
78.3%1theta
Compiler

Compiled 68 to 48 computations (29.4% saved)

regimes78.0ms (0.4%)

Memory
-26.4MiB live, 52.6MiB allocated
Counts
8 → 1
Calls
Call 1
Inputs
lambda1
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) lambda1))
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda1)) #s(literal -1/2 binary64))
(exp.f64 (log.f64 lambda1))
(pow.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) #s(literal 2 binary64))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 0 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal 2 binary64)))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 0 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
Calls

7 calls:

48.0ms
lambda1
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)))))))))
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
theta
3.0ms
phi2
Results
AccuracySegmentsBranch
74.7%1lambda1
74.7%1phi2
74.7%1phi1
74.7%1theta
74.7%1delta
74.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))))))))
74.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)))))))))
Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes21.0ms (0.1%)

Memory
15.0MiB live, 50.5MiB allocated
Accuracy

Total -34.8b remaining (-196.7%)

Threshold costs -34.8b (-196.7%)

Counts
6 → 1
Calls
Call 1
Inputs
lambda1
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) lambda1))
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda1)) #s(literal -1/2 binary64))
(exp.f64 (log.f64 lambda1))
(pow.f64 (pow.f64 lambda1 #s(literal 1/2 binary64)) #s(literal 2 binary64))
Outputs
lambda1
Calls

7 calls:

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

Compiled 104 to 70 computations (32.7% saved)

bsearch1.0ms (0%)

Memory
2.2MiB live, 2.2MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
4.28621081306177e-38
6.093967009153618e-34
0.0ms
-3.092476277607729e-135
-3.34749478418736e-138
Compiler

Compiled 41 to 31 computations (24.4% saved)

bsearch1.0ms (0%)

Memory
1.9MiB live, 1.9MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
4.28621081306177e-38
6.093967009153618e-34
0.0ms
-3.092476277607729e-135
-3.34749478418736e-138
Compiler

Compiled 41 to 31 computations (24.4% saved)

bsearch31.0ms (0.2%)

Memory
-6.1MiB live, 68.2MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
28.0ms
1.3728620454091519e-8
8.910572845870066e-8
Samples
24.0ms96×0valid
Compiler

Compiled 293 to 217 computations (25.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 19.0ms
ival-sin: 6.0ms (30.9% of total)
ival-cos: 5.0ms (25.7% of total)
ival-mult: 3.0ms (15.4% of total)
ival-asin: 3.0ms (15.4% of total)
ival-add: 1.0ms (5.1% of total)
ival-atan2: 1.0ms (5.1% of total)
ival-assert: 0.0ms (0% of total)
ival-sub: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch31.0ms (0.2%)

Memory
9.8MiB live, 52.1MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
28.0ms
1.3728620454091519e-8
8.910572845870066e-8
Samples
21.0ms96×0valid
Compiler

Compiled 251 to 187 computations (25.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 17.0ms
ival-sin: 6.0ms (34.9% of total)
ival-cos: 4.0ms (23.3% of total)
ival-mult: 3.0ms (17.4% of total)
ival-asin: 2.0ms (11.6% of total)
ival-add: 1.0ms (5.8% of total)
ival-atan2: 1.0ms (5.8% of total)
ival-assert: 0.0ms (0% of total)
ival-sub: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch0.0ms (0%)

Memory
0.4MiB live, 0.4MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.7331521631010741
1.1955717568444342
0.0ms
-1.493564243246185
-1.435452794005591
Compiler

Compiled 41 to 31 computations (24.4% saved)

bsearch87.0ms (0.5%)

Memory
-2.5MiB live, 149.8MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
29.0ms
1.4254739206436156e-59
2.5100681096765602e-57
47.0ms
-4.708417636186572e+26
-543614376335687700.0
Samples
66.0ms256×0valid
Compiler

Compiled 521 to 383 computations (26.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 57.0ms
ival-sin: 21.0ms (36.8% of total)
ival-cos: 16.0ms (28% of total)
ival-mult: 9.0ms (15.8% of total)
ival-asin: 6.0ms (10.5% of total)
ival-add: 2.0ms (3.5% of total)
ival-atan2: 2.0ms (3.5% of total)
ival-sub: 1.0ms (1.8% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch0.0ms (0%)

Memory
0.6MiB live, 0.6MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
1.2370004797584805e-84
3.3881594094274137e-72
Compiler

Compiled 41 to 31 computations (24.4% saved)

simplify88.0ms (0.5%)

Memory
26.3MiB live, 139.4MiB allocated
Algorithm
egg-herbie
Rules
1 198×unpow-prod-down
556×pow-to-exp
464×pow2
332×unpow3
270×flip-+
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0121619
0216585
1697580
25021580
Stop Event
node limit
iter limit
Calls
Call 1
Inputs
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) lambda1)
(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 -1636695303948071/818347651974035467503297424206899788054160511510766197370822842024033449101168638720817523081476039287721671031890017752304314136471348263332131897344 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 4789048565205903/95780971304118053647396689196894323976171195136475136 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 phi1 phi1))))))
(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 -1636695303948071/818347651974035467503297424206899788054160511510766197370822842024033449101168638720817523081476039287721671031890017752304314136471348263332131897344 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 4789048565205903/95780971304118053647396689196894323976171195136475136 binary64)) (+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 phi1 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 delta)))
(if (<=.f64 delta #s(literal 146393360968959/2361183241434822606848 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))))
(if (<=.f64 delta #s(literal 1662273001970115/18889465931478580854784 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 (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 -6530219459687219/4503599627370496 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 1 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64))) (+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 0 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(if (<=.f64 theta #s(literal -7800000000000000000 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (if (<=.f64 theta #s(literal 4417117661945961/1766847064778384329583297500742918515827483896875618958121606201292619776 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 delta))) (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))))
(if (<=.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #s(literal 546812681195753/273406340597876490546562778389702670669146178861651554553221325801244124899921990402939147127881728 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 0 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 0 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
lambda1
Outputs
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (sin.f64 (+.f64 phi1 phi1)) #s(literal 2 binary64))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (sin.f64 (+.f64 phi1 phi1)) #s(literal 2 binary64))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (/.f64 (sin.f64 (+.f64 phi1 phi1)) #s(literal 2 binary64))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) lambda1)
(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 -1636695303948071/818347651974035467503297424206899788054160511510766197370822842024033449101168638720817523081476039287721671031890017752304314136471348263332131897344 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 4789048565205903/95780971304118053647396689196894323976171195136475136 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 phi1 phi1))))))
(if (<=.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #s(literal -1636695303948071/818347651974035467503297424206899788054160511510766197370822842024033449101168638720817523081476039287721671031890017752304314136471348263332131897344 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))) (if (<=.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #s(literal 4789048565205903/95780971304118053647396689196894323976171195136475136 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 phi1 phi1))))))
(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 -1636695303948071/818347651974035467503297424206899788054160511510766197370822842024033449101168638720817523081476039287721671031890017752304314136471348263332131897344 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 4789048565205903/95780971304118053647396689196894323976171195136475136 binary64)) (+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) lambda1) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 phi1 phi1))))))
(if (<=.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #s(literal -1636695303948071/818347651974035467503297424206899788054160511510766197370822842024033449101168638720817523081476039287721671031890017752304314136471348263332131897344 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))) (if (<=.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #s(literal 4789048565205903/95780971304118053647396689196894323976171195136475136 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 phi1 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta)) (cos.f64 delta)))
(+.f64 lambda1 (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)) (cos.f64 delta)))
(if (<=.f64 delta #s(literal 146393360968959/2361183241434822606848 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))))
(if (<=.f64 delta #s(literal 1662273001970115/18889465931478580854784 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 (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 -6530219459687219/4503599627370496 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 1 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64))) (+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 0 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(if (<=.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #s(literal -6530219459687219/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 delta))) (if (<=.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #s(literal 1 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64))) (+.f64 lambda1 (atan2.f64 #s(literal 0 binary64) (cos.f64 delta)))))
(if (<=.f64 theta #s(literal -7800000000000000000 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (if (<=.f64 theta #s(literal 4417117661945961/1766847064778384329583297500742918515827483896875618958121606201292619776 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 delta))) (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta)))))
(if (<=.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #s(literal 546812681195753/273406340597876490546562778389702670669146178861651554553221325801244124899921990402939147127881728 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 0 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))))
(if (<=.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #s(literal 546812681195753/273406340597876490546562778389702670669146178861651554553221325801244124899921990402939147127881728 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 delta))) (+.f64 lambda1 (atan2.f64 #s(literal 0 binary64) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 0 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 #s(literal 0 binary64) (cos.f64 delta)))
lambda1

soundness2.1s (11.4%)

Memory
-251.4MiB live, 1 857.6MiB allocated
Rules
18 096×lower-fma.f64
18 096×lower-fma.f32
14 142×lower-fma.f64
14 142×lower-fma.f32
11 480×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
057539
0109533
1436404
23226404
08680404
069424969
1230023703
2521823280
0835022313
02425385
18085310
226845255
348705217
470845215
081314947
05019810
115809624
244699575
081519321
053495
0100479
1386416
22830416
08345416
051420332
1176719833
2618819734
0833418921
050261
094254
1339230
22456230
08947230
022141
040133
1120133
2846133
08744127
Stop Event
fuel
iter limit
node limit
iter limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
Compiler

Compiled 1 372 to 782 computations (43% saved)

preprocess115.0ms (0.6%)

Memory
-16.8MiB live, 325.2MiB allocated
Remove

(abs phi2)

Compiler

Compiled 1 260 to 444 computations (64.8% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...